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

Re^3: Substring comparison

by johngg (Canon)
on May 01, 2012 at 21:31 UTC ( [id://968337]=note: print w/replies, xml ) Need Help??


in reply to Re^2: Substring comparison
in thread Substring comparison

while(<FILE>) { @Array1 = <FILE>; }

That is not going to do quite what you'd hoped. The first time into the loop it will read the first line of the file into the $_ variable, which you never use so that line will be lost. Then, inside the loop you read the file handle in list context as you have an array on the LHS. That will have the effect of reading the remaining lines of the file, one line per element, into the array; the the loop will exit on the next iteration as EOF has been reached. Your array will contain all lines but the first. As you've discovered in your subsequent post you will have to chomp to get rid of line terminators. The correct way to populate your array in a loop would be to use push.

my @arr; while ( <$fh> ) { chomp; push @arr, $_; }

However, there is an easier way as chomp will also operate on arrays

my @arr = <$fh>; chomp @arr;

or even

chomp( my @arr = <$fh> );

I hope this is helpful.

Cheers,

JohnGG

Log In?
Username:
Password:

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

How do I use this?Last hourOther CB clients
Other Users?
Others lurking in the Monastery: (3)
As of 2024-04-26 04:39 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found