Help for this page

Select Code to Download

Select or download this

my %hash;

...
  push @{$hash{$vars[2]}},@vars[0,1,3];
}
close DATA;

Select or download this

$hash{somevalue}[0] = the first value (your $var1)
$hash{somevalue}[1] = the second value (your $var3)
$hash{somevalue}[2] = the third value (your $var4)