|
|
|
| Perl: the Markov chain saw | |
| PerlMonks |
xmathby xmath (Hermit) |
| on Feb 08, 2003 at 16:03 UTC ( #233724=user: print w/replies, xml ) | Need Help?? |
How's your Perl? <hardburn> blast it, xmath, I needed that last shread of sanity! hardburn wonders at the sudden drop in productivity in Perl programmers all over the world thanks to this little stunt.
perl -e'connect$|=socket(1,2,1,$/=select+1),pack sa14,2,"\nDH\$\203\273";print"d ! @ARGV\nq\n";print$/ +<1>=~/".+?^(.*?)^\s*\./sm' perl |
|