Take a look at Getopt::Long. Its pod has examples of that very thing, in a robust and extensible setting. Pod::Usage automates help, extracting the text from your own pod. The two work well together. Very useful!

holli has correctly identified your syntax error. You can avoid the ampersand before the help() call by defining the sub before calling it, or by calling it with empty parens.