my @fields = map length() ? $_ : 'NA', split /\t/, $Line, -1;