Come for the quick hacks, stay for the epiphanies. | |
PerlMonks |
Re^2: Copy Lines After Matchby 2teez (Vicar) |
on Dec 18, 2015 at 07:09 UTC ( [id://1150670]=note: print w/replies, xml ) | Need Help?? |
Hi vinoth.ree Am sure you know one can achieve the OP intended output without so much elaborate solution. like so: One can even take out the while loop and use grep like so: These gives the output: @jalopez453, Please also note that the filehandle is written as __DATA__, double "_" not a single dash as did. Cheers!
If you tell me, I'll forget. If you show me, I'll remember. if you involve me, I'll understand. --- Author unknown to me
In Section
Seekers of Perl Wisdom
|
|