4 lines
95 B
Perl
4 lines
95 B
Perl
$seconds = <>;
|
|
print "Sleeping...\n";
|
|
sleep $seconds; # number is in seconds
|
|
print "Awake!\n";
|