Beefy Boxes and Bandwidth Generously Provided by pair Networks
good chemistry is complicated,
and a little bit messy -LW

RE: Load file into a scalar without File::Slurp

by turnstep (Parson)
on Jul 17, 2000 at 04:23 UTC ( #22800=note: print w/replies, xml ) Need Help??

in reply to Load file into a scalar without File::Slurp

Or the semi-obfuscated version: as long as you just emptied out $/, why not use it? :)

{ local $/; $/ .= $_ while <STDIN>; }

P.S. In general, you want to make changes to global variables a temporary condition, as in merlyn's do loop above, and the more general form:

{ local $/; ## This is already undef, no need to set it ## Read in the file, etc... } ## $/ is now back where it was

Replies are listed 'Best First'.
(chromatic) RE: RE: Load file into a scalar without File::Slurp
by chromatic (Archbishop) on Jul 17, 2000 at 08:09 UTC
    Here's a shorter version of that. I feel dirty:
    { local $/ = <STDIN>; }
    Note to anyone who has to look at $/ to understand this -- do not use this code. It's a seriously ugly thing.

Log In?

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

How do I use this? | Other CB clients
Other Users?
Others meditating upon the Monastery: (4)
As of 2016-10-22 21:03 GMT
Find Nodes?
    Voting Booth?
    How many different varieties (color, size, etc) of socks do you have in your sock drawer?

    Results (298 votes). Check out past polls.