[Moscow.pm] perl 6 vs utf8

[Denis Evdokimov]

while (my $line = <$foofh>) {
   chomp $line;
   my $out = join "", reverse split '', $line;
   print $fh "$out\n";
}