aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAbigail <abigail@abigail.freedom.nl>2021-12-30 20:35:40 +0100
committerAbigail <abigail@abigail.freedom.nl>2021-12-30 20:35:40 +0100
commit94da83737ddcf1d23abd4ae2bf23bcf83a25e9ea (patch)
treebee0a435dfe0c91394e8ece07dc70b2edf1ab5ae
parenta7cfe19e7988033b8b37d4effedcf01ee203ff0e (diff)
downloadperlweeklychallenge-club-94da83737ddcf1d23abd4ae2bf23bcf83a25e9ea.tar.gz
perlweeklychallenge-club-94da83737ddcf1d23abd4ae2bf23bcf83a25e9ea.tar.bz2
perlweeklychallenge-club-94da83737ddcf1d23abd4ae2bf23bcf83a25e9ea.zip
Point to note in blog about graphemes and their influence on palindromes.
-rw-r--r--challenge-145/abigail/perl/ch-2.pl7
1 files changed, 6 insertions, 1 deletions
diff --git a/challenge-145/abigail/perl/ch-2.pl b/challenge-145/abigail/perl/ch-2.pl
index e8452b84e0..c19e8727ce 100644
--- a/challenge-145/abigail/perl/ch-2.pl
+++ b/challenge-145/abigail/perl/ch-2.pl
@@ -48,6 +48,12 @@ use experimental 'lexical_subs';
# We'll be doing the "do as I do" option.
#
+#
+# Please see the section "Unicode and Combining Characters" at
+# https://abigail.github.io/HTML/Perl-Weekly-Challenge/week-145-2.html
+# to see how we interpret a palindrome.
+#
+
local $, = $";
while (<>) {
my %seen;
@@ -64,4 +70,3 @@ while (<>) {
#
say keys %seen;
}
-