view bin/rnooodl @ 9347:8ed0d754334f

<tswett> mv wisdom/\xd0\xa1\xd0\xa1\xd0\xa1\xd0\xa0 wisdom/\xd1\x81\xd1\x81\xd1\x81\xd1\x80
author HackBot
date Wed, 19 Oct 2016 02:15:54 +0000
parents 7f957c1f4661
children 15385eb12db2
line wrap: on
line source

perl -pe 's/([Nn])ooodl/"$1@{[o x(3+rand 7)]}dl"/ge'