use Encode qw/encode decode/; 
$word = from_to( "euc-jp", $word ); #from_to subroutine doesn't exist
$word = encode( "euc-jp", $word ); # mangled