http://www.perlmonks.org?node_id=1078467


in reply to Given When Syntax

You could try one of the modules that provides a switch functionality. Recently I came across Switch::Plain. I personally found it very simple and easy to use.