Getopt::Long will let you abbreviate to uniqueness automatically, so you just define the "generate" option, for example, and -generate, -gen, and -g will all work (with two dashes as wel).