Perl program to print POD when wrong arguments are passed in

Question

How can I get a perl program to print the POD contents when an incorrect argument or number of arguments are passed in?

Answer 1

You can call exec("perldoc", $0); when arguments is wrong. So user will get man-like help.

Answer 2

I'd use the Pod::Usage module

The Getopt::Long module has a good example on its usage.

Answer 3

If it about your program, I think you have to use:

sub usage {
  print<<help
  Usage $0: description of your script
help
}

if (($#ARGV+1) != $count_args) { usage; }