in reply to Re^4: Short version of database push for multiple variables
in thread Short version of database push for multiple variables

Then you just need to add parentheses: 

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

[download]

In Section Seekers of Perl Wisdom