CGI/Perl Guide | Learning Center | Forums | Advertise | Login
Site Search: in

  Main Index MAIN
INDEX
Search Posts SEARCH
POSTS
Who's Online WHO'S
ONLINE
Log in LOG
IN

Home: Perl Programming Help: Beginner:
What is this??? sh: gs: not found

 



kruzer
Deleted

Jun 21, 2000, 7:51 AM

Post #1 of 1 (414 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

 
 


Search for (options) Powered by Gossamer Forum v.1.2.0

Web Applications & Managed Hosting Powered by Gossamer Threads
Visit our Mailing List Archives