in reply to Strict, strings and subroutines
my $type = 'hatter';
my $arg = 'using eval';
my $proc = "do_$type";
eval "$proc( \$arg )";
die( "Eval errored: $@" ) if $@;
my( $foo ) = @_;
print "This can be done $foo.\n";
Once (shame on you!)
Twice (shame on me!)
More often than I'd like to be
All the time
Just when answering stupid polls
Who you callin' a fool?
I refuse to vote in this ridiculous poll
Results (534 votes). Check out past polls.