Help for this page

Select Code to Download

Select or download this

if ($mail_id =~ /\A(box1|box2|box3|other1|other2)*\.(yourcompany|other
+company|elsewhere)\.com\z/ ) {
  print "matched\n";
}

Select or download this

if ($mail_id =~ /\A(box1\.yourcompany\.com|box2\.yourcompany\.com|box3
+\.yourcompany\.com|other1\.othercompany\.com|other2\.elsewhere\.com)\
+z/ ) {
  print "matched\n";
}