use List::MoreUtils qw/mesh/;

my %b = mesh @a, @c;