Собственно сабж, есть в стандартном наборе функия для такого преобразования и обратно, если нет то какие библиотечки надо доставить.

P.S. my $dec = 255; my $hex = sprintf "%x",$dec; не катит так как не может обработать к примеру число 123238095734195632875428137146093219123, оно для него слишком большое.

• PERL DEC->HEX,DiverD, 13:25 , 05-Дек-06
  • PERL DEC->HEX,KobaLTD, 13:44 , 05-Дек-06
    • PERL DEC->HEX,DiverD, 14:38 , 05-Дек-06
      • PERL DEC->HEX,JonnyB, 10:38 , 05-Мрт-10
        • PERL DEC->HEX,mee, 14:05 , 20-Июл-10

Посмотри реализацию тут http://samy.pl/3.pl

>Посмотри реализацию тут http://samy.pl/3.pl

Извратно
Вобщем все вопрос снимаеться проще написать собственную фукцию, что уже в принцепе сделано.

покажи решение

>покажи решение

извиняюсь за никрофилию, но вдруг кому-то понадобится, как недавно мне

sub DecToHex
    {
        $res = '';
        $rests = '';
        $num = $_[0];
        @hex = (0..9, A..F);
        while($num > 15){
            $rests = $num%16;
            $num = int($num/16);
            $res = join("", $hex[$rests], $res);
        }
        $res = join("", $hex[$num], $res);
        return $res
    }

Можно проще:

sub dec2hex($)
{
  return sprintf("%x",shift);
}