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

##</code><code>##

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

##</code><code>##

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