package Module;
sub A { ... }
sub B { ... }
sub C { ... }
return 1 if caller(); # hier endet der Modul-Part
# Ab hier wird alles nur ausgeführt, wenn die Datei als Skript gestartet wird.
require Getopt::Long;
Getopt::Long::GetIOptions(...) or die "usage...";
A();
...