Use the if module. It comes with your perl. You'll need to know your conditional at compiletime so you might need to do your getopt() during some kind BEGIN block.