#!/usr/bin/perl -l use strict; use warnings; use HTML::Entities; my $e = "\366\344"; print encode_entities($e);