use Getopt::Std;
                                                                                
my %opts;
                                                                                
getopts("ciphdvs:",\%opts) or die "$0: USAGE: blah blah\n";;