Select Code to Download

    for ( my $i = 0 ; $i < $l ; $i++ ) {

...
        }

    }

    meta_for ( my $i = 0 ; $i < $l ; $i++ ) {

...
        } # foreach

    } # meta_end_for

    my $code = "xyzzy";
    for ( my $i = 0 ; $i < $l ; $i++ ) {
...
/;

    eval $code;