kruzer
Deleted
Jun 21, 2000, 7:51 AM
Post #1 of 1
(242 views)
|
|
What is this??? sh: gs: not found
|
Can't Post
|
|
I tried runniing a perl script and I received this
$perl test.pl
sh: gs: not found
sh: gs: not found
sh: gs: not found
sh: gs: not found
sh: gs: not found
sh: gs: not found
use Image::Magick;
$bgcolor='white';
$company='ImageMagick';
$company_font='@arial.ttf';
$company_color='red';
$company_size=24;
$filename='image.gif';
$phone_font='@arial.ttf';
$phone_color='green';
$phone_size=18;
$text_font='@arial.ttf';
$text_color='blue';
$text_size=14;
$slogan='Image manipulation software that works like magick.';
$phone='(610) 555-1212';
$image = Image::Magick->new(size=>'400x400');
$x = $image->ReadImage("xc:$bgcolor");
warn "$x" if "$x";
$image->Annotate(font=>$company_font, text=>$company, pen=>$company_color,
gravity=>'North', x=>40, y=>40, pointsize=>$company_size);
$image->Annotate(font=>$text_font, text=>$slogan, pen=>$text_color,
gravity=>'Center', x=>40, y=>40, pointsize=>$text_size);
$image->Annotate(font=>$phone_font, text=>$phone, pen=>$phone_color,
gravity=>'South', x=>40, y=>40, pointsize=>$phone_size);
$x = $image->Write(filename=>$filename, compress=>'LZW');
warn "$x" if "$x";
undef $image;
Dano
|
MAIN
SEARCH
WHO'S 
LOG 