C:\Temp\test>perl test.pl
regex = ^(huey|dewey|louie)$
match:  huey