Select Code to Download

#!/usr/bin/perl -w
use strict;
...

my $foo = "some string"
my $bar = Somefunction();

package My::Module;
our @EXPORT = qw/Somefunction/;
...
{
   # do something;
}