switch-case in Perl
למיטב זכרוני, אין תמיכה בשפה לפקודה דומה ל- switch. מה שכן ניתן לעשות זה שימוש ב- if-elsif. דוגמא:
if ($var == 1) { # do something } elsif ($var == 2) { # do something else } elsif ($var == 3) { # do something else } else { # default }