perl -e '$b++;$a=hex--$b.xA;print$a--.$/for(a..j)' perl -e '$a=++$b.$[;print$a--.$/for(a..j)'