Select Code to Download

for ( XXX some loop ) {
   $patt = gen_patt( $blah);
...
         }';
   die "eval error" if $@;
}