in reply to Image Magick

I deduce that the text is "test". What do you really want to know?

Replies are listed 'Best First'.
Re^2: Image Magick
by tolyan77 (Novice) on Feb 16, 2007 at 05:49 UTC
    How on an existing picture imposes on the text?

      ok, I still did not understand that. Just in case, I ran the program to see if it worked. Lo and behold, it doesn't. I'm guessing you're asking for help getting your program to run.

      First, I added error checking.

      #!/usr/bin/perl -w use strict; use Image::Magick; my $text = 'test'; my $im = new Image::Magick; $im->Read("meteo.jpg"); my $rv = $im->Annotate( text => $text, x => 10, y => 10, ); die("Unable to annotate image: $rv\n") if "$rv"; print "Content-type: image/jpeg\n\n"; binmode STDOUT; print $im->Write('jpeg:-');

      It gives me the error

      Unable to annotate image: Warning 315: no delegates configuration file + found (delegates.mgk) [No such file or directory]

      I have no idea what that means, but I suspected from the start that you might have to specify a font or family. I found an example which specified font => 'kai.ttf', so I tried font => 'Arial.ttf' which gave a promising error message:

      Unable to annotate image: Warning 315: Unable to read font (Arial.ttf) + [No such file or directory]

      Specifying the full path worked.

      #!/usr/bin/perl -w use strict; use Image::Magick; my $text = 'test'; my $im = new Image::Magick; $im->Read("meteo.jpg"); my $rv = $im->Annotate( text => $text, font => 'C:\\WINDOWS\\Fonts\\Arial.ttf', x => 10, y => 10, ); die("Unable to annotate image: $rv\n") if "$rv"; print "Content-type: image/jpeg\n\n"; binmode STDOUT; print $im->Write('jpeg:-');
        OT: is not ikegami truly a man of infinite patience, and a grace to these pages? Folding all that paper must be good for the soul. ..seriously, many thanks, this thread goes into my file of imagemagick tips. Peter
        thank you!