changeset 8197:4ca6ee90e6be

<oerjan> mkx bin/rnooodl//perl -pe \'s/([^w\\w])\\1\\1/"@{[$1 x(3+rand 7)]}"/ge\'
author HackBot
date Sun, 29 May 2016 01:35:44 +0000
parents 798a9de88609
children c22ee4bb1384
files bin/rnooodl
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/bin/rnooodl	Sun May 29 00:49:46 2016 +0000
+++ b/bin/rnooodl	Sun May 29 01:35:44 2016 +0000
@@ -1,1 +1,1 @@
-perl -pe 's/(\w)\1\1/"@{[$1 x(3+rand 7)]}"/ge'
+perl -pe 's/([^w\w])\1\1/"@{[$1 x(3+rand 7)]}"/ge'