Help for this page
Select Code to Download
Select
or
download this
my $ret = GetOptions( ... ); die "usage: $0 [options]\n" unless $ret;