For Getopt::Long, I like to go one step further and have the defaults 'inlined'. Where Ovid wrote:

GetOptions(
...
   'verbose=i'   => \my $VERBOSE,
...
   'minimum=i'   => \my $minimum,
);
                                                                      
+         
$minimum ||= 1;
$VERBOSE ||= 0;
[download]

I like to write:

GetOptions(
...
   'verbose=i'   => \(my $VERBOSE = 0),
...
   'minimum=i'   => \(my $minimum = 1),
);
[download]