Select Code to Download

#!/usr/bin/perl
#
...
if( (eval $expr) == 9 ) {
    print "eval \$expr = 9\n";
}

247.~/perl/tmp > a.pl
7
9
eval $expr = 9