Just->another->Perl->hacker

[Ilmari Karonen]

package UNIVERSAL;sub print {map{s;::; ;g;print}@_=@_}AUTOLOAD{${(caller 0)[3]}}
Just->another->Perl->hacker->print(",\n");

-- 
Ilmari Karonen - http://www.sci.fi/~iltzu/
"TIMTOWTDI, but did you have to pick the ugliest way you could find?"
                     -- after Michael Carman in comp.lang.perl.misc