if ('foo' eq $val) {
   # process case 1
}
elsif ('bar' eq $val or 'baz' eq $val) {
   # process case 2
}
elsif ('boom' eq $val) {
   # process case 3
}
else {
   print "Unexpected value '$val'!\n";
}