use strict;
use warnings;
my $name;
print "Enter name: ";
$name = <STDIN>;
chomp($name);
my $year;
print "Hello $name, how are you?/n";
print "Enter a number:";
$year = <STDIN>;
chomp($year);
print "You're $year years old.";
name2.pl
最新推荐文章于 2021-10-10 19:08:56 发布