my $want= qr/\b(?:c3|d4|e5)\b/; my $match= qr/$want.*?$want.*?$want/;