# Cute example, slightly modified from the encoding.pm doc
#!/usr/local/bin/perl -w
 
use encoding 'euc-jp'; # Note that we support only one encoding

my $book = 'Camel';
my $Rakuda = "\xF1\xD1\xF1\xCC"; # Camel in Kanji
$book =~ s/\bCamel\b/$Rakuda/;

8.61. DynaLoader		8.63. English