use Getopt::Long;

my %opt = (
    'option_name' => 'default_value',
    'element'     => 0,
    'count'       => 5,
);

GetOptions( \%opt,
    'option_name|on:s',
    'element|e!',
    'count|cnt|c=i',
);