Select Code to Download

C:\test>perl -wle"
    print 'the quick brown fox' for 1..3; 
    print chr( 26 ); 
    print 'secret message'
" > junk.txt

C:\test>type junk.txt
the quick brown fox
the quick brown fox
the quick brown fox

C:\test>perl -pe1 junk.txt
the quick brown fox
...
the quick brown fox
→
secret message