Hello magick-users,
I cannot get PerlMagick to draw a dashed line. All previous questions
concerning dashed lines have been answered by using the "convert"
command. However, I want to draw a dashed line within a Perl script
using the draw method. I have tried the following code (and many
others)
#!/usr/bin/perl
use Image::Magick;
$image=Image::Magick->new(size=>"100x30");
$image->Read("xc:white");
$image->Draw(primitive=>"line", points=>"10,10,90,10");
$image->Draw(primitive=>"line", dash-pattern=>"10,10", points=>"10,20,90,20");
$x=$image->Write("dashedline.png");
warn "$x" if "$x";
undef $image;
This produces two solid lines instead of one solid and one dashed line.
I am using ImageMagick 6.3.0-Q16 on Windows XP.
Any kind of help is highly appreciated.
Thanks and best regards,
Thomas
_______________________________________________
Magick-users mailing list
[email protected]
http://studio.imagemagick.org/mailman/listinfo/magick-users
