or download this
my $MISC_FILE_DIR = defined($_=shift) ? $_ : die usage();
my $req = defined($_=shift) ? $_ : die usage();
my $inqfile = defined($_=shift) ? $_ : die usage();
my $sent = defined($_=shift) ? $_ : die usage();
my $status = defined($_=shift) ? $_ : die "please specify
+ status\n" . usage();