Beefy Boxes and Bandwidth Generously Provided by pair Networks
Clear questions and runnable code
get the best and fastest answer

Re^2: csv file is not opening using use strict

by chromatic (Archbishop)
on Sep 07, 2012 at 01:28 UTC ( #992219=note: print w/ replies, xml ) Need Help??

in reply to Re: csv file is not opening using use strict
in thread csv file is not opening using use strict

print "$fields[0] fields1";

That's not going to cause a bareword error under strict.

BEGIN { $| = 1; $^W = 1; }

Why? Especially $^W?

Note that my @fields should be parenthesized to get a list...

Why? Under what circumstances does the declaration of an array not provide list context?

while ( defined( my $line = <$data> ) )

defined is unnecessary here because Perl will add it for you.

... also, you opened $data, so don't forget to close it.

The filehandle's stored in a lexical variable and it's the end of the program and you're not bothering to check the return value (for a filehandle opened for reading!), and the filehandle's at the end of the file at this point, and you have autodie in effect, so why bother?

Comment on Re^2: csv file is not opening using use strict
Select or Download Code

Log In?

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

How do I use this? | Other CB clients
Other Users?
Others exploiting the Monastery: (10)
As of 2015-12-01 09:16 GMT
Find Nodes?
    Voting Booth?

    What would be the most significant thing to happen if a rope (or wire) tied the Earth and the Moon together?

    Results (797 votes), past polls