Beefy Boxes and Bandwidth Generously Provided by pair Networks
Just another Perl shrine

Re: Printing particular column is not working

by fishmonger (Hermit)
on Jul 24, 2014 at 13:39 UTC ( #1094914=note: print w/ replies, xml ) Need Help??

in reply to Printing particular column is not working

my @header=<FH>;

That slurps the entire file into the array, not just the first line.

Try: my $header = shift <FH>;

Or: my @header = split(/,/, shift <FH>);

Or the better option as has already been suggested would be to use the Text::CSV module or one of its brethren.

Comment on Re: Printing particular column is not working
Select or Download Code

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1094914]
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: (8)
As of 2015-11-27 14:10 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 (729 votes), past polls