Help for this page
perl script.pl test2.csv > final.csv
use strict; use warnings; ... chomp $line; print "$line", " ,UF, A, Y, 9, U\n"; }