in reply to How do you move within an array using foreach?
While not tested, I saw this elegant solution in this node:
Credits go to zigdon... ;-)print if /\[foo\]/ .. /\[foo2\]/ foreach ( @lines );
Update: Check Ovid's answer; it's more strict in the requirements set.
-- JaWi
"A chicken is an egg's way of producing more eggs."
In Section
Seekers of Perl Wisdom