using GD inside CGI...

UrbanHick has asked for the wisdom of the Perl Monks concerning the following question:

Howdy monks,

This question stems from me trying to figure out how to properly use Perl’s CGI and GD modules.

Basically I am trying to write a cgi that will us GD to draw a black frame around a given image. I want to image to load from a url. So far from the Perldoc I have constructed this:

#!/opt/bin/perl –w

use GD;
use Image::Size qw(imgsize);
use CGI;
use LWP::Simple qw(get);


my $myImage = get(‘http://www.someurl.net/sample.jpg’);
my ($x, $y) = imgsize(\$myImage);

my $image = GD::Image->newFromJpegData("http://www.someurl.net/sample.
+jpg", 1);
my $black = $image->colorResolve(0,0,0);
$image->rectangle(0,0,$x,$y,$black);
[download]

I am now a confused as to how I could print out the $image inside of a CGI rendered webpage like this:

my $cgi = new CGI;

   print $cgi->header,                   
         $cgi->start_html('test page'),
         $cgi->h1('it’s a framed picture!'),
     $cgi->end_html;
[download]

Many thanks in advanced for all, advice, observations and clarifications.

-UH

Comment on using GD inside CGI... Select or Download Code

Replies are listed 'Best First'.
Re: using GD inside CGI... by themage (Friar) on Dec 19, 2006 at 17:45 UTC
Hi UrbanHick, You can create two diferent cgi (or the same cgi called with diferent parameters), one to return the HTML, and the other to return the image. Or you can have the cgi that return the html process and save the image to disk, and then in the HTML put the URL to that image. This is what I would do, because this way I already know that the image was correctly processed when I send the HTML to the client. The last alternative (that I never tried) is to put the image in base64 (I think) in the HTML. If you prefer this on (I hope not), you can read about it in http://www.unixreview.com/documents/s=8217/ur0305h/. TheMage Talking Web	[reply]
Re: using GD inside CGI... by Joost (Canon) on Dec 19, 2006 at 20:27 UTC
Unless there's a good reason to generate the HTML and the image at the same time, I would use a seperate CGI to just generate the image data: `# in the HTML generating code: # set up headers and other html... print "<img src='/cgi-bin/my-image.cgi?some=params'>";` [download] and... `# in the /cgi-bin/my-image.cgi script: # set up the GD::Image in $image print $cgi->header("image/png"); # set the correct content-type binmode STDOUT; print $image->png; # end` [download] "What should it profit a man, if he should win a flame war, yet lose his cool?"	[reply] [d/l] [select]
Re: using GD inside CGI... by shotgunefx (Parson) on Dec 19, 2006 at 18:09 UTC
You could generate the image and then print a redirect header to the url of it. But I must ask, if it's just a black border, wouldn't HTML work better? -Lee "To be civilized is to deny one's nature."	[reply]


Problems? Is your data what you think it is?
	PerlMonks