[BNE-PM] My one liner!

Derek Thomson derek at wedgetail.com
Thu Sep 19 09:23:42 CDT 2002


Hi,

Here's my entry in the one-line challenge. You get to figure out what it 
does. Just give it any text file. Here's a hint - it'll be more obvious 
what it's doing if you give it a text file that contains English (or any 
other language for human consumption) ...

Here, I feed it the perl manpage:

$ man perl | perl -wane '$_++ for @h{@F}; END { print "$_\t$h{$_}\n" for 
sort keys %h }'

If there are any questions about how exactly this works, ask away!

--
D.




More information about the Brisbane-pm mailing list