It's best not to write code like this. If you have any switch processing to do, just use Getopt::Long.

++TGI. See Use Getopt::Long even if you don't think you need to from not too long ago.