$utf8 = pack 'U*', unpack 'v*', $unicode;

##</code><code>##

$latin1 = pack 'C*', unpack 'v*', $unicode;