my @n = array with nulls;

@n = map { defined $_ ? $_ : () } @n;