Encode::Unicode::UTF7 -- UTF-7 encoding
use Encode qw/encode decode/; $utf7 = encode("UTF-7", $utf8); $utf8 = decode("UTF-7", $ucs2);