Result is 4E5G93GHBE8.use bigint; my @digits=map chr,(0x30..0x39,0x41..0x5d); my $base = 22; my $n = 123456789123456; my $h; while($n > 0){ $h .= $digits[ $n % $base ]; $n /= $base; } print scalar reverse $h';
In reply to Re^4: long integer to hexadecimal conversion
by kikuchiyo
in thread long integer to hexadecimal conversion
by perl_fan
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |