7 lines
167 B
Perl
7 lines
167 B
Perl
|
print "How old are you? ";
|
||
|
|
chomp($age = <STDIN>);
|
||
|
|
if ($age >= 21 ){ # If true, enter the block
|
||
|
|
print "Let's party!\n";
|
||
|
|
}
|
||
|
|
print "You said you were $age.\n";
|