my $arraycnt = 0;
$$_ = $values[$arraycnt++] for @names;