given ($foo) {
  when (1) {print "One";};
  when (2) {print "Two";};
  print "Didn't fit any case we know about";
}