Encode::BOCU1 -- encodes / decodes BOCU-1 string, works as part of Encode.pm
$string = 'Some text to convert... in UTF-8' Encode::from_to($string,'utf8','bocu1'); Encode::from_to($string,'bocu1','shiftjis');
BOCU-1 is a MIME-compatible application of the Binary Ordered Compression for Unicode [BOCU] base algorithm.
Encode::BOCU1 enables to convert any encoding systems supported by Encode.pm from/to BOCU-1 through UTF-8.
Based on pure-perl port of "Sample C Code" on http://www.unicode.org/notes/tn6/, written by Markus W. Scherer on 2002jan24 and is
Copyright (C) 2002, International Business Machines Corporation and others. All Rights Reserved.
The "Sample C Code" is under the X license (ICU version). ICU License : http://dev.icu-project.org/cgi-bin/viewcvs.cgi/*checkout*/icu/license.html
BOCU "Binary-Ordered Compression For Unicode" is a patent-protected technology of IBM. (US Patent 6737994)
Ported and modified by Naoya Tozuka <firstname.lastname@example.org> As with the original C code, this port is licensed under the X license (ICU version).