@keys = pairwise {return "$a $b"} @fname, @lname; @hash{@keys} = @state;