This is a great start. Some off-the-cuff suggestions:

use GetOpts;

Think about "my" vs. "local".

You have at least one if statement where the TRUE result is an empty block, you might want to look at unless as an alternative.

Of course, it's easy for me to say these things, I didn't have to do all the hard work of writing it. I just get to comment on it. {grin}