Maybe consider using Getopt::Long instead of hand-rolling the argument parsing.
Also consider looking at line 171 in your real script, and looking at why that warning is thrown there. For example, if $ARGV[1] is not defined, then that warning will be thrown. Also see splain and warnings.
In reply to Re: throw a warning if no argument were passed
by Corion
in thread throw a warning if no argument were passed
by deep27ak
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |