Select Code to Download

#!/usr/bin/perl -w
use strict;
...
}
print $return; # this prints 2
printLogPatterns(@LOGE);

#pattern.pl
use strict;
...
sub asub{
   print "a sub";
}# is this also possible to "export"?