binmode STDOUT, ':encoding(UTF-8)';

##</code><code>##

encode("MIME-Header",decode('UTF-8',$arg)));