Perl programming assistance required

HyperTrey · 03-05-2008, 01:46 PM

I have a small program that reads in a csv file, truncates a line or 2 using split. Makes a calculation, and rearrange the output and place it into another csv file.

The problem lies in where the "" end up. Apparently the truncation screws up the placement of quotation Marks. How do I strip the "" from the file as i read it in? This will solve the issue.

forrestt · 03-05-2008, 02:40 PM

Do you mean something like this (obviously, $value would be read in from a file):

Code:

#!/usr/bin/perl

$value = '"addf,as,df,123"';
$value =~ s/"//g;
($dummy1, $dummy2, $dummy3) = split(",",$value);
print "$dummy3,$dummy2,$dummy1\n";

HTH

Forrest

HyperTrey · 03-05-2008, 02:46 PM

ty ty ty so very much

theNbomr · 03-05-2008, 03:04 PM

Quote:

Originally Posted by forrestt

Do you mean something like this (obviously, $value would be read in from a file):

Code:

#!/usr/bin/perl

$value = '"addf,as,df,123"';
$value =~ s/"//g;
($dummy1, $dummy2, $dummy3) = split(",",$value);
print "$dummy3,$dummy2,$dummy1\n";

HTH

Forrest

Doesn't this blow away the reason for the quotes? What happens if the d-quotes are enclosing one or more commas?
The example given is not typical CSV format. Normally, there are quotes enclosing individual text fields so that commas and whitespace can be preserved within. It seems to me you would be better served with one of perl's fancy extended regex's which can match commas that are immediately enclosed by quotes.
It will probably require a combination of splits, depending on which fields are quoted.
Maybe this complexity is why there is the perl module Text::CSV.
--- rod.