changeset 8195:15385eb12db2

<oerjan> mkx bin/rnooodl//perl -pe \'s/(.)\\1\\1/"@{[$1 x(3+rand 7)]}"/ge\'
author HackBot
date Sun, 29 May 2016 00:46:18 +0000
parents 5060d5af0b98
children 798a9de88609
files bin/rnooodl
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/bin/rnooodl	Sun May 29 00:37:55 2016 +0000
+++ b/bin/rnooodl	Sun May 29 00:46:18 2016 +0000
@@ -1,1 +1,1 @@
-perl -pe 's/([Nn])ooodl/"$1@{[o x(3+rand 7)]}dl"/ge'
+perl -pe 's/(.)\1\1/"@{[$1 x(3+rand 7)]}"/ge'