* 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