Petra Vide Ogrin wrote:
$text =~ m/\b\w{4,8}[^IVX]\.\s\l/g

but it doesn't work - it just gets the words at the end of each sentence. So this \l at the end of the match is wrong. What should I do to make it work?

Try:

 $text =~ m/\b\w{4,8}[^IVX]\.\s[a-z]/g

--
Just my 0.00000002 million dollars worth,
 Shawn

"For the things we have to learn before we can do them, we learn by doing them."
 Aristotle

--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/


  • abbreviations Petra Vide Ogrin
    • Re: abbreviations Mr. Shawn H. Corey

Reply via email to