Beefy Boxes and Bandwidth Generously Provided by pair Networks
Do you know where your variables are?

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?

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 meditating upon the Monastery: (5)
As of 2016-10-23 20:37 GMT
Find Nodes?
    Voting Booth?
    How many different varieties (color, size, etc) of socks do you have in your sock drawer?

    Results (302 votes). Check out past polls.