my $usage=<<EOF;
usage:
These are your options punk.
EOF

die $usage unless ($#ARGV==3);