use Encode qw(encode); my $continue_aufrom_OCTETS = encode('UTF-8', $continue_aufrom_CHARACTERS, Encode::FB_CROAK); STDOUT->print($continue_aufrom_OCTETS);