This code found at http://perlmonks.org/index.pl?node_id=731935 via PAUSE's reports of failed uploads.
The author wrote:
I found it way too hard to try to make Getopt::Std and Getopt::Long behave as I'd like It's much easier to just implement command line options parsing by h and... Careful: you cannot combine several single letter command line optio ns into one, They must stay separate.
I have removed command line options: the script now just takes the path to a tarball to fix.