Beefy Boxes and Bandwidth Generously Provided by pair Networks
Problems? Is your data what you think it is?
 
PerlMonks  

Re: Slurp multiple lines to a variable

by aaron_baugher (Curate)
on May 14, 2015 at 01:51 UTC ( [id://1126626]=note: print w/replies, xml ) Need Help??


in reply to Slurp multiple lines to a variable

You're most of the way there; just define your variable outside the loop and then add the lines to it. Check out the lines I added to your code below. You'll want to use one method or the other, depending on whether you want the lines in an array or as a single string in a scalar.

open(F, "file"); my $lines = ''; # a scalar to store the lines in my @lines; # an array to store the lines in while(<F>) { if (/StartPattern/.../StopPattern/) { $lines .= $_; # append the line to my scalar push @lines, $_; # add the line to my array } } close(F);

Aaron B.
Available for small or large Perl jobs and *nix system administration; see my home node.

Replies are listed 'Best First'.
Re^2: Slurp multiple lines to a variable
by yoda54 (Monk) on May 14, 2015 at 01:54 UTC
    Thanks!

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://1126626]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others chanting in the Monastery: (5)
As of 2024-04-24 19:58 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found