# HG changeset patch # User HackBot # Date 1464482986 0 # Node ID 798a9de886099389ff91704d2088e44d64280500 # Parent 15385eb12db2671242cbace520edc361c31f9f60 mkx bin/rnooodl//perl -pe \'s/(\\w)\\1\\1/"@{[$1 x(3+rand 7)]}"/ge\' diff -r 15385eb12db2 -r 798a9de88609 bin/rnooodl --- a/bin/rnooodl Sun May 29 00:46:18 2016 +0000 +++ b/bin/rnooodl Sun May 29 00:49:46 2016 +0000 @@ -1,1 +1,1 @@ -perl -pe 's/(.)\1\1/"@{[$1 x(3+rand 7)]}"/ge' +perl -pe 's/(\w)\1\1/"@{[$1 x(3+rand 7)]}"/ge'