Text::CSV issues

[parkers]

Hi,

I've just installed the Text::CSV module (

http://search.cpan.org/~alancitt/Text-CSV-0.01/CSV.pm)

for manipulating CSV files ... I'm having a problem utilising the $_ variable correctly with the Text::CSV functions ... my code snippet is as follows:

open (FILE,$file) or die ("Unable to open file"
while (<FILE>)
{
chomp $_;
$status = $csv->parse($_);
@columns = $csv->fields;
print @columns; # for test purposes
}
close (FILE);

Absolutely nothing is bound to @columns array however if I substitute the following after the chomp the code works OK:

$_='&quot;TEXT, DELIMITED,, STRING&quot;,1,2,3,4,5,6,7,&quot;END&quot;';

I've checked for file existence, permissions and data by printing each line of the file to screen as it reads so there should be no problem there.

Is there something stupid I'm missing here or has anyone any ideas?

Thanks,
SP

 

[parkers]

DOH !! rtfm !

I just re-read the Caveats section of:

http://search.cpan.org/~alancitt/Text-CSV-0.01/CSV.pm

so if anyone has had the same problem then removing the chomp statement fixes ! (new-lines are acceptable way of closing off the string)