Re: Pearls (not really) of Perl programming

[Ovid]

in reply to Pearls (not really) of Perl programming

I would cheerfully have strangled the guy:

{
    no strict;
    &{$cgi->param('action')};
}

[tachyon]

It could have been worse :-)

eval $cgi->param('action');
open F, $cgi->param('file');
$dbh->do( "SELECT * FROM blah WHERE foo LIKE %" . $cgi->param('search'
+) .'%' );