if ($a =~ /^ ( ABA | SCO | ACC | PHC | GHF ) $/x ) { ... }