Select Code to Download

unless (caller() =~ /main/) {
    My::Standalone->run();
...
}

1;

#!perl
use strict;
...
print "Do something\n";
run(); # Call the run function
exit;