|
Can you see this line in the code:
print CSV join(',', @row), "\n";
Change ',' to ';', if you really want the semicolon.
The "if" statement above actually attempts to protect the embedded commas and double-quote characters, and you would have have to swap the comma there with a semicolon as well.
And the "open" function call further above does not deal with UTF8 Excel files, so I changed it to look like this:
open(CSV , '>:utf8' , "$prefix-Sheet$index.csv");
|