$ perl -Mopen=:encoding(UTF-8) -MText::CSV_XS -e 1 Badly placed ()'s. $ perl -Mopen=':encoding(UTF-8)' -MText::CSV_XS -we 1 $