Select Code to Download

# Preserves any pre-existing anonymous hashref.
@hr = map{ $hr[$_]->{k} = $val[$_] } 0 .. $#hr;

# Preserves any pre-existing anonymous hashref.
$hr[$_]->{k} = $val[$_] for 0 .. $hr;