Beefy Boxes and Bandwidth Generously Provided by pair Networks
Just another Perl shrine
 
PerlMonks  

Re: regex on previous lines

by choroba (Bishop)
on Jan 31, 2013 at 16:36 UTC ( #1016355=note: print w/replies, xml ) Need Help??


in reply to regex on previous lines

What do you mean by "do a Regex"? Do you want to match the lines agains regular expresisons, or do you want to modify the lines via substitution?

As usually, there are more ways how to do that. For example, if you are in a *nix environment, you can tac your file and process it from the last line. Or, you can remember the last two lines in case you want to process them:

my @lines; while (<>) { push @lines, $_; shift @lines if @lines > 3; } if ($lines[2] =~ $regex1) { if ($lines[1] =~ $regex2) { if ($lines[0] =~ $regex3) { # Do your work here. } } }
لսႽ ᥲᥒ⚪⟊Ⴙᘓᖇ Ꮅᘓᖇ⎱ Ⴙᥲ𝇋ƙᘓᖇ

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1016355]
help
Chatterbox?
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others cooling their heels in the Monastery: (2)
As of 2018-01-21 06:50 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    How did you see in the new year?










    Results (227 votes). Check out past polls.

    Notices?