[Fri Jan 12 11:07:40 2001] [error] protocol error (1) at /usr/lib/perl5/site_perl/5.6.0/i386-linux/Gimp/Net.pm line 66.
where I can find more information on gimp-perl executing in cgi enviroment?
The following is the source code of my perl script
#! /usr/bin/perl
use CGI;
use strict;
use
Gimp;
use Gimp::Net;
Gimp::init;
my $q = new CGI;
my $userdir =
$q->param("userdir");
my $tempdir = $q->param("tempdir");
my
$titletext = $q->param("titletext");
my $menutext =
$q->param("menutext");
my $pagenumber =
$q->param("pagenumber");
print "User Directory: ",
$userdir,
"\nTemplate Directory: ",
$tempdir,
"\nTitle Text:
",
$titletext,
"\nMenu Text:
",
$menutext,
"\nNo. of Pages: ",
$pagenumber;
my
$file = "/sitemakerpro/template/chip/screenshot.jpg";
my $file1 =
"/sitemakerpro/template/chip/screenshot1.jpg";
my $imgX;
my
$imgY;
my $img =
Gimp->gimp_file_load(1,$file,$file);
$imgX =
Gimp->$img->width;
$imgY = Gimp->$img->height;
my
$draw =
Gimp->gimp_image_active_drawable($img);
Gimp->$img->file_save
($draw,$file1,$file1)
