Select Code to Download

perl -w .\TestFileOpsWithUTF8_Names.t
1..2
...
#   Failed test 'check -f with UTF8 file name'
#   at .\TestFileOpsWithUTF8_Names.t line 18.
# Looks like you failed 1 test of 2.

#!perl
use strict;
...

#cleanup
unlink $fnameNoUTF8 or die "could not unlink file $fnameNoUTF8";