qrpff is a Perl script created by Keith Winstein and Marc Horowitz of the MIT SIPB. It performs DeCSS in six or seven lines. The name itself is an encoding of "decss" in rot-13. In fact, two versions of qrpff exist: a short version (6 lines) and a fast version (7 lines). Both appear below. s``$/=2048;while{G=29;R=142;if((@a=unqT="C*",_)[20]...
Found on http://en.wikipedia.org/wiki/Qrpff
No exact match found