Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl: the Markov chain saw
 
PerlMonks  

Re: UPDATE: Variable number of words/fields in a line/record

by jeroenes (Priest)
on Jun 18, 2001 at 10:58 UTC ( #89237=note: print w/ replies, xml ) Need Help??


in reply to UPDATE: Variable number of words/fields in a line/record
in thread Variable number of words/fields in a line/record

Don't use variables, but an array or hash. Would do something like:

while( <> ){ split; splice @_, 0, 2; #removes first two elements store_elements_function( @_ ); #sub to store the remainder }
If you really want to name the items, use a hash. Define the names first:
my @std_keys = qw/proto .../; my @ext_keys = qw/name9 name10 name11/; .. #and in loop: my %hash; if( @_ < 9 ){ @hash{@std_keys} = @_; } else { @hash{(@std_keys, @ext_keys)} = @_; } print "My proto is: ",$hash{'proto'},"\n"; ...
Hope this helps. You can read up on it in perldata.

Jeroen
"We are not alone"(FZ)


Comment on Re: UPDATE: Variable number of words/fields in a line/record
Select or Download Code

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others chanting in the Monastery: (7)
As of 2014-09-19 08:35 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    How do you remember the number of days in each month?











    Results (133 votes), past polls