<moonythedwarf> le//rn moon//moon is often named the following: moonythedwarf moonythehuman moonheart08 moony moon__ computing and luxon, making porthellos a real pain

#!/usr/bin/perl
use Encode; binmode *$_,"encoding(utf8)" for STDIN,STDOUT; local$/; for (split//,<STDIN>) { rand(5)<3 and y/EOeo/\xc4\xc5\xe4\xe5/; print }