【Perl】初心者コーナーPart9

このエントリーをはてなブックマークに追加
40
@char=('0'..'9','a'..'z','A'..'Z');

という62文字を使って 1 (あるいは 0)から ZZZZZZZZ までの
62進数を順番に生成したいのですが、上手にやる方法はありますか?
41デフォルトの名無しさん:02/01/01 16:51 ID:???
>40
ハードコーディングで良いなら
push (@value,0) for (1..8);
これを初期値(つまり$value[0]が1桁目、$value[1]が2桁目)にして
値を1増やす関数と、@valueを分解しながら$char[$value[$_]]とかして
表示する関数を書いてみ。
それが出来たら桁とか@charを可変に出来る様にしてみよう。