in reply to How to no goto or gosub
More reading, but directly to the point: using if, elsif and else in Perl.
Here's the official docs: perlsyn. Specifically the Compound Statements section.