$ perl -w permute_n.pl 18 0 2 4 -5 -3 -1 0: 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18 2: 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,17,16,18 4: 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,18,16,17 6402373705727995: 18,17,16,15,14,13,12,11,10,9,8,7,6,5,4,1,3,2 6402373705727997: 18,17,16,15,14,13,12,11,10,9,8,7,6,5,4,2,3,1 6402373705727999: 18,17,16,15,14,13,12,11,10,9,8,7,6,5,4,3,2,1