Sophie: padre-0.980.0-2.mga4 noarch

padre-0.980.0-2.mga4.noarch.rpm

#!/usr/bin/perl

use 5.008;
use strict;
use warnings;

$| = 1;

print "What is your name ?";
my $name = <STDIN>;
chomp $name;
print "Hello $name!\n";