Select Code to Download

pod2usage(0)                                 if $Opt{help};
pod2usage(-exitstatus => 0, -verbose => 2)  if $Opt{man};
...
@ARGV = (1) unless @ARGV;

pod2usage("$0: missing arguments")           if @ARGV == 0;