Select Code to Download

#!/usr/bin/perl
use warnings;
...
my $direct = unac_string($string);
my $via_bytes = unac_string('UTF-8', $rstring);
print "$direct $via_bytes\n";  # cote cote