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

##</code><code>##

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