Help for this page
$ perl -Mutf8 -mopen=:locale -e ' my $data = "this is a TEST SENTENCE Foo Bar GRUB jo аз co"; ... print "@uc_strings\n"; ' TEST SENTENCE GRUB аз