OK, I converted the text file named CSV_XS.pm from Unix format to DOS format (that is, I added CR characters to it).

C:\>perldoc -l Text::CSV_XS
C:\strawberry\perl\site\lib\Text\CSV_XS.pm

C:\>chdir C:\strawberry\perl\site\lib\Text\

C:\strawberry\perl\site\lib\Text>bytecnt < CSV_XS.pm | egrep "CR|LF"
10      0A      LF      1938
13      0D      CR      0

C:\strawberry\perl\site\lib\Text>attrib CSV_XS.pm
A    R     C:\strawberry\perl\site\lib\Text\CSV_XS.pm

C:\strawberry\perl\site\lib\Text>attrib -r CSV_XS.pm

C:\strawberry\perl\site\lib\Text>rename CSV_XS.pm CSV_XS.pm_LF_Only

C:\strawberry\perl\site\lib\Text>sed -n p CSV_XS.pm_LF_Only > CSV_XS.p
+m

C:\strawberry\perl\site\lib\Text>attrib +r CSV_XS.pm

C:\strawberry\perl\site\lib\Text>bytecnt < CSV_XS.pm | egrep "CR|LF"
10      0A      LF      1938
13      0D      CR      1938

C:\strawberry\perl\site\lib\Text>wc -l CSV_XS.pm
   1938    CSV_XS.pm

C:\strawberry\perl\site\lib\Text>
[download]

Then I tested it. It resolved the problem.

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

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

C:\>
[download]

Thank you, ikegami and Tux.

Jim