if ( $string =~ m/abc(?:def|xyz)/ ) { 
  print "ok!" 
}