# SWITCH
{
  local $_ = $MyValue;
  /$reg2/ && do {
      sub_for_key_a();
      last;
    };
  /$reg1/ && do {
      whatever();
      sub_for_key_b();
      last;
    };
  #default
    sub_for_default();
} # END SWITCH