- or download this
my $n = # choose your rgx number
...
my $rgx2 = qr/^\s/;
- or download this
# $rgx3 is untested, but provided for example.
...
(.*?\.) # $2 - the sentence
)/x; # end $1 and regex
- or download this
my $regex = $n == 1 ? $rgx1 : $n==2 ? $rgx2 : $rgx3 ;
...
# untested. thx to Cristoforo for idea of tr in e
}