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