<oerjan> addquote <hppavilion[1]> THEY MADE A MOVIE ABOUT THE 50 SHADES SEQUEL TOO! <hppavilion[1]> Somebody shall pay for this <imode> not me, I ain\'t buyin\' a ticket.

#!/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 }