in reply to How to add a new column into my csv file?

G'day chaney123,

See the response I gave you two days ago.

Change

$csv->print(\*STDOUT, [$_, @{$data{$_}}]) ...

to

$csv->print(\*STDOUT, [$_, @{$data{$_}}, SKEW]) ...

where SKEW evaluates to your new column datum.

— Ken