in reply to Image Magick convert as Perl

You're looking for the Annotate() method instead of Draw ... 
my $err = $image->Annotate(
  pointsize => 200,
  text => 'hello world',
  x => 700,
  y => 650,
  stroke => '#ff0000',
  fill => '#90ff40',
  font => '@ARIAL.TTF',  # for ttf, it's at-sign then the path to the 
+.ttf file ..
                         # grabbing these .ttf's from a windows box is
+ fine
);

[download]

Replies are listed 'Best First'.
Re^2: Image Magick convert as Perl
by GrandFather (Saint) on Sep 14, 2005 at 20:55 UTC

    Yes, I was aware of Annotate, but I'd used draw in the command line version and there it worked. Annotate will suffice, but I'm still puzzled that the Draw doesn't work. The documentation does not seem to describe a way of supplying the text to be drawn for Draw and supplying the text as (... text=>"Hello World", ...) generates an error to the effect that "text" is not a valid parameter (I've not got the code here).

    My other question is: how do I generate 50% transparent text? Have I to do it by generating the text in another image then compose the two images together, or is there a more direct way of generating partially transparent text on an image?

    An even more fundamental question is: How do I generate a "blank" image that I can draw on?

    Perl is Huffman encoded by design.
[reply]
[d/l]
      An even more fundamental question is: How do I generate a "blank" image that I can draw on?
      I'll take that one first (reference: perl-magick -- search for "xc" in the Examples section): 
      my $image = Image::Magick->new();
$image->Set(size=> "800x600");
$image->ReadImage('xc:white');

      [download]
      See also this formats page for what IM takes (XC is listed there as well as some built-in images and patterns).

      Annotate will suffice, but I'm still puzzled that the Draw doesn't work.
      me too.. i guess it's just another IM inconsistancy .. (note at least in the http://imagemagick.org/script/perl-magick.php|docs] that Draw doesn't list a 'text' parameter)

      My other question is: how do I generate 50% transparent text?
      umm.. no clue.. But i suspect if there is an answer it might be on this site: ImageMagick v6 Examples -- seems like a very good collection of faq/how-to's...
[reply]
[d/l]

        Thanks for that. I'd found the ReadImage example, but adapting it didn't get the results I was after - which may be because with Image Magick there always seems to be three different things that aren't clearly documented that you have to get right at the same time. I was confused by "ReadImage" which implies that there should be an image somewhere to read, but looks like it is actually a magical create image.

        I have managed to overlay one image on another using burn in or dodge to get something like transparancy so I ought be able to do it by drawing to a second image then combine that image with the first. I'll post something in snippets when I get it sorted out.

        Perl is Huffman encoded by design.
[reply]

In Section Seekers of Perl Wisdom