Re: Getopts problem
- From: "BS" <minimyme@xxxxxxxxx>
- Date: 28 Apr 2006 05:59:50 -0700
Update with the screenshot
C:\>type a.pl
#!c:\perl\bin\perl
use Getopt::Std;
getopts('a:s:');
die "Error with getopt\n" if ( ! defined($opt_a) );
print "$opt_a\n" if ( defined ( $opt_a ) );
print "$opt_s\n" if ( defined ( $opt_s ) );
C:\>perl a.pl -atest -stest
test
test
C:\>a.pl -atest -stest
Error with getopt
.
- References:
- Getopts problem
- From: BS
- Getopts problem
- Prev by Date: Re: #$ary ???
- Next by Date: Re: Getopts problem
- Previous by thread: Getopts problem
- Next by thread: Re: Getopts problem
- Index(es):
