I am still struggling to get a life when I released Encode-1.57, available as follows.
Whole: http://www.dan.co.jp/~dankogai/Encode-1.57.tar.gz Diff (380 lines) http://www.dan.co.jp/~dankogai/current-1.57.diff.gz This is mainly to address "smoke when -Uuseperlio". On Monday, April 22, 2002, at 08:29 , Abigail wrote: > ------- > -------------------------------------------------------------------- > O O O O -Duseperlio > F F F F -Duseperlio -Duse64bitint > O O O O -Duseperlio -Duselongdouble > F F F F -Duseperlio -Dusemorebits > F F F F -Uuseperlio > | | | +- PERLIO = perlio -DDEBUGGING > | | +--- PERLIO = stdio -DDEBUGGING > | +----- PERLIO = perlio > +------- PERLIO = stdio Though I am sure t/JP.t is PerlIO-independent, ":utf8" lines may stand in a way so I decided to add "unless (PerlIO::Layer->find('perlio'))...' back in BEGIN block. Tested on FreeBSD w/ -Uuseperlio. Dan the Encode Maintainer $Revision: 1.57 $ $Date: 2002/04/22 20:27:30 $ ! t/JP.t t/KR.t t/perlio.t unless (find PerlIO::Layer 'perlio') ... line is back again. t/JP.t and t/KR.t were supposed to work but maybe '>:utf8' lines need PerlIO. Sigh.... ! Encode.xs Unicode/Unicode.pm lib/Encode/JP/JIS7.pm t/perlio.t ->perlio_ok now does eval{ require PerlIO::encoding } there so it correctly returns 1 when PerlIO::encoding is yet loaded. ! Encode.xs perl-current patch #16072 reflected