Select Code to Download

use warnings;
use strict;
...
my $arg = -1;
GetOptions('arg:i' => \$arg) or die;
print "$arg\n";