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