#!/usr/bin/perl
use charnames ':full';
print "\N{FACE WITH TEARS OF JOY}\n";


##</code><code>##

Wide character in print at print_face.pl line 3.
&#128514;