use GetOpt::Long;
    my $verbose = '';   # option variable with default value (false)
    my $all = '';       # option variable with default value (false)
    GetOptions ('verbose' => \$verbose, 'all' => \$all);

##</code><code>##

    use GetOpt::Long;
    #Adjust bractes and commas to taste
    GetOptions (
                'verbose' => \(my $verbose = ''),   
                'all'     => \(my $all     = ''),
               );