in reply to regex help ...

You might want to look at Parse::RecDescent if you're going to do more than just check the warn within loop...endloop. It will handle the annoying parsing bits and do it right. (Not to say that you won't ... just that I wouldn't want to even try when other options exist.)

------
We are the carpenters and bricklayers of the Information Age.

The idea is a little like C++ templates, except not quite so brain-meltingly complicated. -- TheDamian, Exegesis 6

... strings and arrays will suffice. As they are easily available as native data types in any sane language, ... - blokhead, speaking on evolutionary algorithms

Please remember that I'm crufty and crochety. All opinions are purely mine and all code is untested, unless otherwise specified.

In Section Seekers of Perl Wisdom