I doubt it's much to win the contect, but, hey, something I thought might win.

#!/usr/bin/perl
$_='**T?!4h?>e;@0P?!5e?!-r?;l4@*J%o?!&u?>r?=n?4a?!+l';
while($_) { s/^(.)(.*)/$2/; $b=ord($1); next if($b>127);
$a+=$b if($b<64); print chr($a&127) if($b>63); }
print "\n";
[download]

--
Perl is intergalactic! WolfSkunks use it!