"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 ( ) {
s/([1-5]), ([1-5]), ([1-5]), ([1-5]), ([1-5]), ([1-5]), /$hash{$1},
$hash{$2}, $hash{$3}, $hash{$4}, $has
Hello All,
I have two CSV files, the first file I'm using to create a hash table:
The first file looks like this:
1, 11
2, 22
3, 33
4, 44
5, 55
#!/usr/bin/perl
use strict;
use warnings;
my $file = "c:/brian/AX/hp_ax_items.csv";
open(FILE, $file) or die "Can't open t