Select Code to Download

my %hash;
@hash{@people} = @jobs;

my %hash = map { $people[$_] => $jobs[$_] } 0 .. $#people;

use Functional;
my %hash = @{ zip(\@people, \@jobs) };