[Moscow.pm] Image:;Magick colors

[Kononov Alexey]

Товарищи по perl. Подскажите,как преобразовывать цвета, выдаваемые Image::Magick следующим кодом:

  $index = $image_m->Get("pixel[$b_x, $b_y]");
  ($r, $g, $b) = split ',', $index;
  print "$r, $g, $b\n";
  --
  52942, 46774, 40092
в нормальные (типа: 255, 10, 50) ?