use getopt::std;
our($opt_g,$opt_k,$opt_a,$opt_w,$opt_m);