doc: remove repeating characters using Perl

SamuelLarkin · Jul 3, 2024 · 00a38c8 · 00a38c8
1 parent 6b66250
commit 00a38c8
Show file tree

Hide file tree

Showing 2 changed files with 7 additions and 0 deletions.
diff --git a/docs/perl.md b/docs/perl.md
@@ -0,0 +1,6 @@
+# Perl
+
+## Remove Repeating Chinese Characters
+```sh
+perl -ple 'BEGIN{use utf8;use open qw(:std :utf8);} s/(\p{Han})\1{1,}/\1/gm' < translation.zho.word
+```
diff --git a/mkdocs.yml b/mkdocs.yml
@@ -65,6 +65,7 @@ nav:
   - Miller: milller.md
   - Miscellaneous: doc.md
   - nvim: nvim.md
+  - Perl: perl.md
   - rsync: rsync.md
   - SLURM: slurm.md
   - tmux: tmux.md