CGI Populating a hash from an two arrays

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";
}