Select Code to Download

Timwi (timwi) wrote in perl,
@ 2004-10-21 00:11:00
...
close F;
print $content;
and this produces a corrupt response. What is the correct way of loadi
+ng a binary file? Thanks for any help in advance.

s**lil*;  $*=join'',sort split q**;  s;.*;grr; &&s+(.(.)).+$2$1+; $; =
qq-$_-;s,.*,ahc,;$,.=chop for split q,,,reverse;print for($,,$;,$*,$/)