in reply to Re: Look ahead and join if the line begins with a +
in thread Look ahead and join if the line begins with a +

Just a small note - local() automatically undef()ines whatever gets passed to it.
$foo = "I am a package var, yes I am"; { local $foo; print "\$foo is no more\n" if not defined $foo; } print qq(\$foo returns!\n) if defined $foo; __output__ $foo is no more $foo returns!

HTH

broquaint