#!/usr/bin/perl
#<CheckInput.pl> Given a New Testement Reference, Validate it

use Getopt::Long;
my %args;
GetOptions(\%args,
           "arg1=s",
           "arg2=i",
           "arg3=i",
) or die "Invalid arguments!";
die "Missing -arg1!" unless $args{arg1};
die "Missing -arg2!" unless $args{arg2};
die "Missing -arg3!" unless $args{arg3};

print "You entered Valid ARGs\n";