How can you do different things on certain lines in a text filedivided by separators?

[hans]

How can you do different things on lines in a file divided in rages,
for example:

aaa
..
..
.. insert "aaa" on every line between aaa and bbb
..
bbb
..
..
.. insert "bbb" on every line between bbb and ccc
..
..
ccc
..
.. etc.
..

 

[J. Gleixner]

How can you do different things on lines in a file divided in rages,
for example:

What do you have so far?

perldoc -f open
perldoc perldocfaq6

 

[J. Gleixner]

What do you have so far?

perldoc -f open
perldoc perldocfaq6

Make that perldoc perlfaq6

 

[George Mpouras]

How can you do different things on lines in a file divided in rages,
for example:

aaa
.
.
. insert "aaa" on every line between aaa and bbb
.
bbb
.
.
. insert "bbb" on every line between bbb and ccc
.
.
ccc
.
. etc.
.

while(<DATA>)
{
if ( /aaa/ .. /bbb/ ) {
print "line between aaa and bbb : $_" }

if ( /bbb/ .. /ccc/ ) {
print "line between bbb and ccc : $_" }
}


__DATA__
aaa
hello1
hello2
hello3
bbb
world1
world2
world3
ccc