I found my mistake: I misread the line number in the error message. DOH!!!
The complaints were related to the block that prints individualized error
messages:
<CODE>
unless (defined $directory && defined $comment && defined $max_rows &&
defined $max_cols && defined $lg_dim && $lg_dim =~ m/[1-9][0-9]?/ &&
(!defined $saturation || abs($saturation) < 100)) {
print "Specify a directory to scan (e.g., --directory /etc)\n" unless
$directory;
print "Provide a comment for the photos (e.g., --comment foobar)\n"
unless $comment;
print "Specify the number of rows and columns in the indexes (e.g.,
--cols 5 --rows 5)\n" unless ($max_rows && $max_cols);
print "Specify a number between -99 and 99 for the image saturation value
(e.g., --saturation -50)\n" unless (abs($saturation) < 100);
print "Specify a number between 1 and 99 for the images\' final size as a
percentage of the beginning size (e.g., --largedim 75)\n" unless
($lg_dim > 0 && $lg_dim < 100);
exit;
}
</CODE>
I've added a test for "defined-ness" to the conditional statement
print "foobar" unless (defined $foo && abs($foo) > 100)'
....and everything works fine now. Thanks for all the help!
--
Eric P.
Sunnyvale, CA
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
