NAME

EscapeUTF8.pm - Escape IBM extended Kanji and emoji in Shift_JIS


SYNOPSIS

    use EscapeUTF8;
    my $text = "";
    EscapeUTF8::escape( \$text, $ENV{HTTP_USER_AGENT} );
    EscapeUTF8::unescape( \$text, $ENV{HTTP_USER_AGENT} );


DESCRIPTION

        escape( UTF8_STRING, USER_AGENT );

何もしません。(未実装)

        unescape( UTF8_STRING, USER_AGENT );

UTF8_STRING(スカラー文字列へのリファレンス、またはスカラー文字列自体)中の &#xHHHH; 形式にエスケープされた部分を UTF-8 バイナリに変換します。


COPYRIGHT

    Copyright 2004 Kawasaki Yusuke <u-suke [at] kawa.net>
    http://www.kawa.net/