use Getopt::Long;
GetOptions( "ot:s" => \$ot ) or die("Error in command line arguments\n");