# HG changeset patch
# User HackBot
# Date 1464485824 0
# Node ID c22ee4bb1384ab3359beaac28bdf95cb45590728
# Parent  4ca6ee90e6be2c594e678b0d27cc3c466a8cf1c9
<oerjan> mkx bin/rnooodl//perl -pe \'s/([^w\\W])\\1\\1/"@{[$1 x(3+rand 7)]}"/ge\'

diff -r 4ca6ee90e6be -r c22ee4bb1384 bin/rnooodl
--- a/bin/rnooodl	Sun May 29 01:35:44 2016 +0000
+++ b/bin/rnooodl	Sun May 29 01:37:04 2016 +0000
@@ -1,1 +1,1 @@
-perl -pe 's/([^w\w])\1\1/"@{[$1 x(3+rand 7)]}"/ge'
+perl -pe 's/([^w\W])\1\1/"@{[$1 x(3+rand 7)]}"/ge'