Beefy Boxes and Bandwidth Generously Provided by pair Networks
Syntactic Confectionery Delight

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]
[LanX]: hm just read an article on claiming that RPerl is 250 times faster. ... it's that even possible?
[marto]: under certain circumstances perhaps
[RonW]: as I understand it, RPerl "compiles" a subset of Perl to C, so I would expect the final executable to run a lot faster

How do I use this? | Other CB clients
Other Users?
Others contemplating the Monastery: (11)
As of 2017-05-22 20:13 GMT
Find Nodes?
    Voting Booth?