Need to create a hash table from csv file. Starting from sample code's, I'm getting error. I don't know do i need to use hash_ref to recognize(add/modify) hash table. Hash table should contain contents of Column1 and Column5 from CSV file. Hash $keys need to be Column5 and corresponding $values to be Column1. Later, I'll refer/replace Column1 to edit other task. Please help me how to solve these task! Thanks
line 1 table description,,,,,,,, line 2 few more file describtion,,,,,,,, ,,,,,,,, ,,,,,,,, ,,,,,,,, ,,,,,,,, ,,,,,,,, Column_1,Column_2,,,,Column_3,Column_4,Column_5, Name11,In,,,,DATA13,DATA14,Id11, Name21,Out,,,,DATA23,DATA24,Id11, Name31,In,,,,DATA33,DATA34,Id22, Name41,In,,,,DATA43,DATA44,Id22, ,,,,, ,,,,, ,,,,,
sub mainCSV { open (my $inputfile1, '<', "$inputfile") or die "Unable to open $input +file1: $!"; my %hash; while (<$inputfile1>) { $inputfile1 =~ s/\s*\z//; my @arrayfile1 = split /,/, $inputfile1; my $keyfile1 = shift @arrayfile1; $hash{$keyfile1} = \@arrayfile1; } print %hash; close $inputfile1; }
In reply to csv to hash table by waytoperl
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |