Select Code to Download

my $one = one;
eval "uncomment_$one()";

'abc' =~ m/b/;
print( eval( '$`') , "\n")