] Perl experts were astounded by the results. "I was
] amazed that none of the students were able to read this
] simple sentence:
]
] $_='while(read STDIN,$_,2048){$a=29;$c=142;if((@a=unx"C*",$_)
] [20]&48){$h=5;$_=unxb24,join"",@b=map{xB8,unxb8,chr($_^$a [--$h 84])}
] @ARGV;s/...$/1$&/;$d=unxV,xb25,$_;$b=73;$e=256|(ord$b[4]) . . .

LOL!

99.99% of High School Seniors Can't Read Perl