Re^2: Read and write UTF-8

Note that UTF8 and UTF-8 aren't equivalent:

 $ perl -lwE 'binmode STDOUT, ":encoding(UTF8)"; print chr 10240000;'
Code point 0x9C4000 is not Unicode, may not be portable at -e line 1.
�����
 $ perl -lwE 'binmode STDOUT, ":encoding(UTF-8)"; print chr 10240000;'
Code point 0x9C4000 is not Unicode, may not be portable at -e line 1.
"\x{9c4000}" does not map to utf8 at -e line 1.
\x{9C4000}

($q=q:Sq=~/;[c](.)(.)/;chr(-||-|5+lengthSq)`"S|oS2"`map{chr |+ord
}map{substrSq`S_+|`|}3E|-|`7**2-3:)=~y+S|`+$1,++print+eval$q,q,a,
[download]

Comment on Re^2: Read and write UTF-8 Download Code