CGI Populating a hash from an two arrays

$i=0;
@myarraykeys=("key-1","key-2");
@myarrayvalues=("val-1","val-2");
foreach (@myarraykeys) {
        $hash{$_} = $myarrayvalues[$i];
        $i++;
}
while (($key, $value) = each(%hash)) {
        print "$key and $value";
}