* Bill Ward <[EMAIL PROTECTED]> [2007-09-08 21:45]: > I don't think I've ever seen that done,
use LWP::Simple qw($ua);
--
*AUTOLOAD=*_;sub _{s/(.*)::(.*)/print$2,(",$\/"," ")[defined wantarray]/e;$1}
&Just->another->Perl->hack;
#Aristotle
* Bill Ward <[EMAIL PROTECTED]> [2007-09-08 21:45]: > I don't think I've ever seen that done,
use LWP::Simple qw($ua);
--
*AUTOLOAD=*_;sub _{s/(.*)::(.*)/print$2,(",$\/"," ")[defined wantarray]/e;$1}
&Just->another->Perl->hack;
#Aristotle