Re: Possibly useful script for Glade users

["A. Pagaltzis" <pagaltzis gmx de>]

* Sergei Steshenko <sergstesh yahoo com> [2006-11-23 07:15]:
> --- Matthew Braid <ptkperl mdb id au> wrote:
> >           printf("%s %s %s %s\n",
> >                  $desc->[1], $desc->[2], $desc->[0], $handler);
>
> :-) - the immortal "C"-school influence on Perl :-)
>
> print $desc->[1], $desc->[2], $desc->[0], $handler, "\n";
>
> would be more Perlish.

Pot calling the kettle black?

    print "@{ $desc }[ 1, 2, 0 ] $handler\n";

:-)

-- 
*AUTOLOAD=*_;sub _{s/(.*)::(.*)/print$2,(",$\/"," ")[defined wantarray]/e;$1}
&Just->another->Perl->hacker;
#Aristotle