5 lines
86 B
Perl
5 lines
86 B
Perl
INPUT: $line = <>;
|
|
if ($line !~ /exit/) {
|
|
print "Try again\n";
|
|
goto INPUT
|
|
} |