http://www.perlmonks.org?node_id=997905


in reply to Export CSV v2

Have you looked at line 22? 
# Get vars from second line
my @vars = @{ $csv->getline($csvfh) };

[download]
When does getline return an undef? Your input probably contains only one line, already consumed by $columnNames.
لսႽ† ᥲᥒ⚪⟊Ⴙᘓᖇ Ꮅᘓᖇ⎱ Ⴙᥲ𝇋ƙᘓᖇ

In Section Seekers of Perl Wisdom