my %opt={verbose=>0,all=>0); GetOptions(\%opt,'talkative|verbose','everything|all'); #### GetOptions(\%opt,'talkative|verbose','all|everything'); #### GetOptions(\%opts,'Debug=i'=>\(my $Debug=0),'verbose','all');