Beefy Boxes and Bandwidth Generously Provided by pair Networks
Syntactic Confectionery Delight
 
PerlMonks  

Re: How to get Dynamic Images on the Screen

by dree (Monsignor)
on Jun 09, 2002 at 16:07 UTC ( #172923=note: print w/replies, xml ) Need Help??


in reply to How to get Dynamic Images on the Screen

You have to print the image to the standard output, but before you have to put this 2 instructions:

1) binmode STDOUT;
2) print "Content-type img/png\n\n"; "Content-type: image/png\n\n"; #as merlyn said

The GD example becomes:
use GD; # create a new image $im = new GD::Image(100,100); # allocate some colors $white = $im->colorAllocate(255,255,255); $black = $im->colorAllocate(0,0,0); $red = $im->colorAllocate(255,0,0); $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; print "Content-type: image/png\n\n"; #as [merlyn] said # Convert the image to PNG and print it on standard output print $im->png;

UPDATE: fixed the error in the content type string

Replies are listed 'Best First'.
•Re: Re: How to get Dynamic Images on the Screen
by merlyn (Sage) on Jun 09, 2002 at 16:09 UTC

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://172923]
help
Chatterbox?
[Eily]: It can also be used to force a copy, and remove magic from a variable
[Eily]: there was a post some time ago about variable coming from regex taking more space than the same string defined directly IIRC
[Eily]: and if there's XS, make sure the scalar holds a string representation, that sounds like bad practice though (forcing that on the call side)
[choroba]: You should never pass $1 without double quotes to a sub
[choroba]: or "I should never", at least
[choroba]: that's not the sub's business
[Eily]: choroba but does $name = $1 solve the issue ?
[Eily]: if so, most subs start with my (VARIABLES) = @_ anyway

How do I use this? | Other CB clients
Other Users?
Others exploiting the Monastery: (6)
As of 2018-02-22 17:18 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    When it is dark outside I am happiest to see ...














    Results (296 votes). Check out past polls.

    Notices?