P:\test>perl58 -le"$_ = pack 'C*', 0x7f .. 0x81; print length, qq[ : '$_' ]"
3 : '⌂Çü'