[Moscow.pm] Конкурс

[Михаил Монашёв]

Здравствуйте, Ruslan.

> Вот вам еще в два раза быстрее, но с хаком:

> srand(13);
> my $dots = 39293;
> my (@color) = map Imager::Color->new(rand(255), rand(255), rand(255) ), (1..30);
my $img = $image->>{'IMG'};
> Imager::i_ppix($img, rand(1024), rand(1024), $_)
>         for (@color)x($dots/@color);

> :)

У  Кости  Рябова  быстрее (в 10 раз примерно) и размер больше. Похоже,
что  цвет  не  играет  никакой  роли при сжатии. Скорее положение друг
относительно  друга. Можно рисовать точки белым, как у Кости, и размер
будет большим.

-- 
С уважением,
 Михаил                          mailto:postmaster на softsearch.ru