Help for this page
foreach (@rows) { s/\t/\x09/ig; s/\n/\x0A/ig; ... print FILE qq{"$_",}; # Other delimiters too. $cell++; }