2012/10/26 Михаил Монашёв <[email protected]>:
> Здравствуйте, 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 раз примерно) и размер больше. Похоже,
> что цвет не играет никакой роли при сжатии. Скорее положение друг
> относительно друга. Можно рисовать точки белым, как у Кости, и размер
> будет большим.
Эхххх. Не увидел я там варианта указать матрицу для hatch. Я
попробовал fill => {image => ...} и он медленнее будет. Зато в моем
варианте картинка красивая :)
> --
> С уважением,
> Михаил mailto:[email protected]
>
> --
> Moscow.pm mailing list
> [email protected] | http://moscow.pm.org
--
Best regards, Ruslan.
--
Moscow.pm mailing list
[email protected] | http://moscow.pm.org
