C:\Code>perl permute_all.pl
Depth = 3
A1C
A1D
A1E
A2C
A2D
A2E
B1C
B1D
B1E
B2C
B2D
B2E

C:\Code>