Hey, first of all happy new years and thanks to all that took their time to
reply. Now, I no longer get software errors. Basically, I just am dying to
add text to my created png files. My stats:
Linux
Apache webserver
Perl 5.00503
I use perlmagick only for web pages, no interest in command line use right now
The problem? After I created a working script where it creates 'button.png'
and views it, I try to add text to it, and no changes take affect. Without
that one line that adds text (Or should) the script is perfect. I don't want
it changed...anyway, that's the dilema, and here is the code:
#!/usr/bin/perl
use Image::Magick;
#binmode STDOUT;
print "Content-type: image/png\n\n";
my($image);
$image = Image::Magick->new;
$image->Set(size=>'200x50', font=>'Generic.ttf', text=>"Hello, JOEL!",
pointsize=>10, stroke=>'red', fill=>'red', x=>100, y=>50); # this is one line
$image->ReadImage('xc:blue');
$image->Quantize(colorspace=>'grey');
$image->Crop(geometry=>'100x100"+1"0+20');
$image->Write(filename=>'button.png', compression=>'None');
binmode STDOUT;
$image->Write('png:-')
As you see, the 7th line from the top which starts as
$image Set(size ...) is not kicking in
How do I keep this script, but add text to it without fail? This is funny
situation because the png's can be made and changed, and viewed, but when
text is added, it's useless. I can't grasp why. Sadly, I can't find an
example that makes a png file and adds text to it. All I see are scripts
where you see what LOOKS like a png script with text added, but that is
useless to me as I need buttons made on the fly.
Thanks. I hope this was a more concise problem, and not too long. I know you
guys are busy
joel
