Gossamer Forum
Home : General : Perl Programming :

Test script for GD...

Quote Reply
Test script for GD...
Does anyone know of any good GD test scripts? I need to see at least a demo script works on my server, before I start learning how to use it, etc. Current code I have is;

Code:
use GD;


# create a new image
my $im = new GD::Image(100,100);


# allocate some colors
my $white = $im->colorAllocate(255,255,255);
my $black = $im->colorAllocate(0,0,0);
my $red = $im->colorAllocate(255,0,0);
my $blue = $im->colorAllocate(0,0,255);


# make the background transparent and interlaced
$im->transparent($white);
$im->interlaced('true');


# Put a black frame around the picture
$im->rectangle(0,0,99,99,$black);


# Draw a blue oval
$im->arc(50,50,95,75,0,360,$blue);


# And fill it with red
$im->fill(50,50,$red);


# make sure we are writing to a binary stream
binmode STDOUT;


# Convert the image to PNG and print it on standard output
print $im->jpeg;

The problem with this, is that I get an IS Error. It is as follows;

[Thu May 29 08:26:44 2003] [error] [client ] malformed header from script. Bad header=: /home/bn123/bn123.net/www/test.cgi

I'm not sure if this is a script problem, or a missing library, or what?

Cheers

Andy (mod)
andy@ultranerds.co.uk
Want to give me something back for my help? Please see my Amazon Wish List
GLinks ULTRA Package | GLinks ULTRA Package PRO
Links SQL Plugins | Website Design and SEO | UltraNerds | ULTRAGLobals Plugin | Pre-Made Template Sets | FREE GLinks Plugins!
Quote Reply
Re: [Andy] Test script for GD... In reply to
*Sigh* Wink

You aren't printing a header Frown

print "Content-type: image/jpg\n\n";

I like how again we have to fix code you are getting paid to write Tongue

Last edited by:

Paul: May 29, 2003, 8:44 AM
Quote Reply
Re: [Paul] Test script for GD... In reply to
Whoops Blush

I always think (for some reason) that the writing part will print a header for me. Duh! Do you know of any good examples that would show me how to use GD::Text ?

Cheers

Andy (mod)
andy@ultranerds.co.uk
Want to give me something back for my help? Please see my Amazon Wish List
GLinks ULTRA Package | GLinks ULTRA Package PRO
Links SQL Plugins | Website Design and SEO | UltraNerds | ULTRAGLobals Plugin | Pre-Made Template Sets | FREE GLinks Plugins!
Quote Reply
Re: [Andy] Test script for GD... In reply to
The magic search box at search.cpan.org =)

http://search.cpan.org/author/MVERB/GDTextUtil-0.85/Text.pm

Last edited by:

Paul: May 29, 2003, 8:49 AM
Quote Reply
Re: [Paul] Test script for GD... In reply to
That will server me right for relying on Google and PerlDoc.com Crazy

Cheers

Andy (mod)
andy@ultranerds.co.uk
Want to give me something back for my help? Please see my Amazon Wish List
GLinks ULTRA Package | GLinks ULTRA Package PRO
Links SQL Plugins | Website Design and SEO | UltraNerds | ULTRAGLobals Plugin | Pre-Made Template Sets | FREE GLinks Plugins!