#!/usr/bin/perl
use warnings;
use strict;
use charnames();
print charnames::viacode(0x1F42A); # prints "DROMEDARY CAMEL"