Isn't it in the while loop though

Not in the code you posted:

my $dnc_col = '';

while (my $row = $csv->getline($input))
[download]

Unless I misunderstand your intention, I think you should swap the order of these two lines.