use Getopt::Long;
        my %opt = (
                'option_name' => 'default_value',
                'element'     => 0,
                'count'       => 5,
        );
        
        GetOptions(
            'option_name|on:s' => \$opt{'option_name'},
                'element|e!'       => \$opt{'element'},
                'count|cnt|c=i'    => \$opt{'count'},
        );
        
        if ($opt{'option_name'} eq 'some_value') {
                ## do work ##
        }