Spreadsheet::ParseExcel format help

[cyates]

I am using Spreadsheet::ParseExcel to read data in from an excel file, and then writing that data to a .txt file. The program runs fine, but my data is the form of: 'Part Number, ' 'Vendor, ' 'Vendor Part Number, ' 'Price, ' Is there a way to format Spreadsheet::ParseExcel or use a regex to get rid of the ' ,'?

[runrig]

Is there really comma separated values in each cell, or is the file actually a CSV file?

Either way, you could probably use Text::CSV to parse the string into an array of values.

[ww]

my @commaless_array = split /,/ record ...and then write it out to the text file of your choice with whatever formatting you want.
See perldoc -f split from your CLI.

[Anonymous Monk]

Depends :) read perlintro#Regular expressions , especially the Simple substitution section

And use xls2tsv, http://www.cpan.org/authors/id/A/AN/ANDALE/xls2csv-1.7.pl, http://search.cpan.org/dist/xls2csv/script/xls2csv, ...

[cyates]

Simplest answers are the best =] working with CSV values would be good, my problem was the annoying single quotes ' ' and this little code took care of it for me:

#!/usr/bin/perl

use strict;
use warnings;

my $sometext = 'somefile.txt';

open(SOME, $sometext);

while(<SOME>) {

    chomp;
    
    $a = $_;

    $a =~ s/'//g;
    
    print $a; }

[ww]

Please don't use $a or $b as variable names -- NOT EVEN IN EXAMPLES; they have specialized behaviors for use when sorting... and they don't provide any indication of their content. Some short (1 letter) possibilities: $s (for "string"); $l for line; etc. etc.

P.S: syntacticly trivial, but annoying: You changed the character you wanted removed from a comma in your OP to a single quote in your 'simplest answer.' Perhaps one was a typo, and in this thread, probably just set off my pre-coffee compulsiveness/ill-humor/whatever... but like $a, it sets a bad example for future readers.