This code found at 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.