perl t/04utf8.t |& perl -d:Unicode -pe1