>> perl -le '$x = "1"; print ++$x for (1..9)'
2
3
4
5
6
7
8
9
10
[download]

The autoincrement of "9" results in "10", not "0".

/prakash