C:\>perl -Mopen=:encoding(UTF-8) -MText::CSV_XS -e 1

C:\>perl -MText::CSV_XS -Mopen=:encoding(UTF-8) -e 1

C:\>