Здравствуйте, 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:[email protected]
--
Moscow.pm mailing list
[email protected] | http://moscow.pm.org
