Hi guys,i am new to perl and wanted to ask a question ;-) I have to convert two .csv tables to a hash. First table is Telefonnumber;Name;FirstName ....,....,....,.... Second one is Streetname;ZipCode;Telefonnumber ....,....,....,... The first one i made to a Hash of Array, key is the Telefonnumber, that works. And i made it variable, so i can change the key if i want to. The second one i made to a Array of Hashes, but i am not able to make it variable,that means that i can use it for other csv tables. Maybe u can give me some advice.
open (DATA, "< $Filename") or die "..."; my $headline = <DATA>; chomp $headline; my @headlineNew = split(';',$headline); my @headHash; while (<DATA>) { my @save=split(';',$_); chomp @save; push(@headHash, { $headline[0] => $save[0], $headline[1] => $save[1], $headline[2] => $save[2], }); }
At push i want to make it variable, if the csv file is bigger than 3. I hope u understand what i mean, Thank you
In reply to Perl Hashes by Horst
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |