my @new_array = grep { exists $hash{$_} ? $hash{$_} : 0 } @array;