perl - ユーザー定義可能な基数のシリアル番号を生成するための既製のオープンソースソフトウェアはありますか？

Question

ユーザー定義可能な基数のシリアル番号を生成するための既製のオープンソースソフトウェアはありますか？

できればPerlまたは同様のスクリプト言語で。

Answer 1

Integer::Tinyを見てください。これにより、任意のサイズの1文字の「数字」の文字列を指定して、整数をそのセットに変換できます。長さnの文字列を指定すると、数値は効果的に基数nに変換されます（ただし、もちろん、その文字列が通常の桁を並べ替えない限り、通常の基数n表現のようには見えません）。

編集： これは、ベース3でやり直されたSorpigalのコメントからのワンライナーベース10ソリューションです：

perl -MInteger::Tiny -e 'my $it = Integer::Tiny->new("012"); printf "%0".$ARGV[0]."d\n", $it->encrypt($_) for (shift..shift);' 1 10 5