Perhaps not so obfuscated - but should be amusing.

$e = 'print "$a "; if($a++ < 10){eval $e;}';
eval $e;
[download]