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