Tag: switch statement in perl