use Getopt::Long;
my $verbose='';
GetOptions ( 'verbose' => \$verbose );

##</code><code>##

use Getopt::Long qw{:config no_ignore_case};

##</code><code>##

use Getopt::Long qw{:config bundling no_ignore_case};

##</code><code>##

Unknown option: e
Unknown option: r