SWITCH: for ($ITEMS_B) {
  /^134/ && do {
      # see above
      last SWITCH;
    };
  !/^(134|00)/ && do {
      # see above
      last SWITCH;
    };
  /^00/ && do {
      # see above
      last SWITCH;
    };
  # else
  do {
    #see above
    last SWITCH;
  }
}