Select Code to Download

print "The time is $time\n";

#!/usr/bin/perl
use strict;
...
# take a look at your handywork
print $script_text;
exit(0);

# ## comment

s/# ##[^\n]+\n\s*/\n/g;

s/\{/n/ /g;
s/\}\s+elsif/} elsif/g;
s/;\s+my/; my/g;