Beefy Boxes and Bandwidth Generously Provided by pair Networks
more useful options
 
PerlMonks  

Re: Need help with arrays and CSVs

by jrsimmon (Hermit)
on Dec 26, 2007 at 21:00 UTC ( #659117=note: print w/replies, xml ) Need Help??


in reply to Need help with arrays and CSVs

Hello trey5498- Ok, so I cleaned this up a bit and added code tags. After I installed Text::CSV, this code ran perfectly well on my machine. It basically takes every comma separated value and pushes it onto the @printerstat array. Is that what you intended? If not, you'll need to be more specific about the goal your attempting to reach and the problem you're encountering.

Please note the use of
use strict; use warnings;
at the beginning of the script. I've been casually coding in perl for a few years now and have found them to be invaluable.

Also see PerlMonks FAQ, Writeup Formatting Tips, and How do I post a question effectively? to familiarize yourself with the surroundings.
use strict; use warnings; use Text::CSV; my @printerstat = (); my $file = 'inputdata.csv'; my $csv = Text::CSV->new(); open (FILE, $file) or die "Couldn't open location file: $!"; while (<FILE>) { $csv->parse($_); push(@printerstat, $csv->fields); print @printerstat; } close FILE;

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others making s'mores by the fire in the courtyard of the Monastery: (6)
As of 2021-04-21 16:56 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found

    Notices?