for ($string) {        # given
  if (/<=/) { .. }     # when
  elsif (/=>/) { .. }  # when
  else { .. }          # default
}