Out of interest, I did a simple script to reverse the order of the letters (from 2nd to 2nd last), it's not random, but it does make the text look mangled...

$s="According to a researcher at an English university";
print qq{@{[map{@:=split//;@:[1..$#:-1]=reverse@:[1..$#:-1];join"",@:}
+$s=~m/(\w+)/g]}\n};
[download]

The output has translated the string

According to a researcher at an English university

to the new string

Anidroccg to a rehcraeser at an Esilgnh utisreviny