http://qs1969.pair.com?node_id=1197614


in reply to Trickery with Getopt::Long (flag option, with optional integer arg)

Use the :i specifier. Refer to Summary of Option Specifications. 
use warnings;
use strict;
use Getopt::Long;

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

[download]

In Section Seekers of Perl Wisdom