"Brian Volk" schreef:

> 1, 1, 2, 3, 4, 5, bowl cleaner, $10,000, 30
> 2, 1, 2, 3, 4, 5, kitchen cleaner, $20,000, 45
> 3, 1, 2, 3, 4, 5, hand cleaner, $15,000, 55
> [...]
>
> while ( <COMP> ) {

    s/([1-5]), ([1-5]), ([1-5]), ([1-5]), ([1-5]), ([1-5]), /$hash{$1},
$hash{$2}, $hash{$3}, $hash{$4}, $hash{$5}, $hash{$6}, /;

Better change the decimal separator to something else than a comma, or
change the field separator, and/or put "" around the values that contain
a field separator.

-- 
Affijn, Ruud

"Gewoon is een tijger."


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/


Reply via email to