Select Code to Download

shell> stty eof ^Z
shell> perl -p >>notes
BEGIN { print ''.localtime(),$/ } $_= "$.: $_"
...
Here are my notes for today.
I should really make this a real script.
CTRL-Z

shell> cat script
$_= "$.: $_";
__END__
...
shell> perl -p <script
1: Testing
2: this.