use utf8; use Template qw(); my $template = Template->new; $template->process('foo.tmpl', { x => '☺' }); __END__ Wide character in print at …/lib/site_perl/5.30.0/x86_64-linux-thread-multi-ld/Template.pm line 167. 123☺456