Select Code to Download

use strict;
use test_module;
...
            );

&test;

use strict;

sub test {
    print $main::hash{foo} . "\n";
}