Beefy Boxes and Bandwidth Generously Provided by pair Networks
laziness, impatience, and hubris

Re: read a few lines, put them into named variables

by robsv (Curate)
on Feb 22, 2001 at 01:43 UTC ( #60045=note: print w/replies, xml ) Need Help??

in reply to read a few lines, put them into named variables

This is very cool! I did run into one small quirk in the key/value pair example - it doesn't stop (I think because the last drops out of the for, not the loop block). I got it to work as:
LOOP: { defined($_ = <STDIN>) or last LOOP for my($key,$value); chomp($key,$value); $hash{$key} = $value; redo; }
I guess the chomp really isn't necessary, but I wanted to ditch the newlines. Thanks!

- robsv

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://60045]
[Corion]: LanX: Ah, yeah - Frankfurt is in the quake region, but at the very border. I think I've never noticed a quake in Frankfurt myself
[marto]: good morning all

How do I use this? | Other CB clients
Other Users?
Others wandering the Monastery: (5)
As of 2017-01-18 10:13 GMT
Find Nodes?
    Voting Booth?
    Do you watch meteor showers?

    Results (161 votes). Check out past polls.