numerotation alpha-numérique avec perl

[perljuser]

Salut,

est-ce que qqn sait comment activer la numerotation alpha-numérique avec perl

Par example

numberic => 0,1,2,...9,10,11,12,...99,100,... # $x = 0;$x++;

lower-alpha => a,b,c,...z,aa,ab,ac,...zz,aaa,... # $x = "a";$x++;

upper-alpha => A,B,C,..,Z,AA,AB,AC,...ZZ,AAA,... # $x = "A";$x++;

lower-alpha-num => a,b,c,...z,0,1,2,3,...9,aa,ab,ac,...zz,10,11,12,...99,aaa,... # ?

upper-alpha-num => A,B,C,..,Z,0,1,2,3,...9,AA,AB,AC,...ZZ,10,11,12,...99,AAA,... # ?