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

Re^5: Extract lines between two patterns

by philipbailey (Chaplain)
on Jan 22, 2012 at 09:38 UTC ( #949237=note: print w/replies, xml ) Need Help??

in reply to Re^4: Extract lines between two patterns
in thread Extract lines between two patterns

Please don't ignore requests to use <code> tags. You can edit your posts and add them. Having posted runnable code, the issues become more obvious: you open file "block.power" for writing, not reading--so use "<", not ">" (and you don't test whether the open succeeds). Your while loop loops infinitely over "$fh", which is always true; you should say while (<$fh>) {, which actually reads from the filehandle. The undefined variable in the pattern match is in fact $_.

Log In?

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

How do I use this? | Other CB clients
Other Users?
Others meditating upon the Monastery: (8)
As of 2017-05-25 22:58 GMT
Find Nodes?
    Voting Booth?