This is my first obfuscated submission - based upon fun with ++ - any thoughts on making it less obvious? :).

#!/usr/bin/perl
$_=_($_);$_+=$_;$?=$_**$_;$?.=$|;$?=~s;${|};$_;;$@=$?>>1;$@+=$_;$sub=$
+print='a';while($while=<DATA>){$until=$while%$?;$while=$while%$@;unti
+l($while==$d){ $print=_($print);$while--;}$until?print"$print":print"
+ ";$print=$sub;}print"\n";sub _{$_=shift;$_++;return$_;}
__END__
9
66
87
479
588
943
1324
3142
5907
7068
13275
25317
7182
5903
4052
2363
931
504
398
161
71
10
[download]