read utf-8 input in letter frequency example

diff --git a/barcat b/barcat
index 9c4741a383efaafac4dc11423aaf0e885fde22a1..a5ea9f33c2267c0d2b480a3fad5a874ec3daa478 100755 (executable)
--- a/barcat
+++ b/barcat
@@ -334,7 +334,7 @@ Commonly used after counting, for example users on the current server:
 Letter frequencies in text files:
 
     cat /usr/share/games/fortunes/*.u8 |
-    perl -CO -nE 'say for grep length, split /\PL*/, uc' |
+    perl -CS -nE 'say for grep length, split /\PL*/, uc' |
     sort | uniq -c | barcat
 
 Number of HTTP requests per day: