TPJ One-Liner #1Adding a long list of numbers on the command line:
perl -e ’print eval join("+", @ARGV)’ 6 10 20 11 9 16 17 28 100 33333 14 -7 |
TPJ One-Liner #2 |
A cheap alarm clock:
perl -e ’sleep(120); while (1) { print "\a" }’
Code tarballs available for issues 1–21.
I reformatted the CD-ROM contents. Some things may still be a little wonky — oh, why hello there <FONT> tag. Syntax highlighting is iffy. Please report any glaring issues.
TPJ One-Liner #1Adding a long list of numbers on the command line:
perl -e ’print eval join("+", @ARGV)’ 6 10 20 11 9 16 17 28 100 33333 14 -7 |
TPJ One-Liner #2 |
A cheap alarm clock:
perl -e ’sleep(120); while (1) { print "\a" }’