GetOptions("file=s"  => \my $input_file,
           "verbose" => \$VERBOSE,
           "help"    => \my $HELP)
  or die "Insert usage message here";