regex help - only one value returned

[email protected] (Gary Stainburn)
Newsgroups perl.beginners
Organization Ringways Garages Ltd
Message-ID <[email protected]>
I have an array of regex expressions that I apply to text returned from 
tesseract.

Each match that I get then gets stored for future processing. However, 
I'm struggling with one regex.

The problem is that:

1) with brackets round the titles it returns two matches.
2) without brackets, it returns nothing.

Can anyone point me at the correct syntax please.

Gary

[root@dev dev]# ./t
match1='Miss Jayne Doe' 'Miss'
[root@dev dev]# cat t
#!/usr/bin/perl

use strict;
use warnings;

my $T=<<EOF;
Customer name and address
Miss Jayne Doe
19 Their Street
Somewehere
In Yorkshire
IN1 3YY
EOF

print "match1='$1' '$2'\n" if ($T=~/^((mr|mrs|miss|dr|prof|sir) 
.{5,}?)\n/smi);
print "match2='$1' '$2'\n" if ($T=~/^(mr|mrs|miss|dr|prof|sir 
.{5,}?)\n/smi);
[root@dev dev]#
lmpx.com only provides a reader for public news (NNTP) servers. It is not affiliated with the servers or forums shown here and is not responsible for the content of articles, which is written by their respective authors.