Beefy Boxes and Bandwidth Generously Provided by pair Networks
Pathologically Eclectic Rubbish Lister

Re^2: Creating an animated gif with GD

by punkish (Priest)
on Aug 22, 2010 at 12:41 UTC ( #856582=note: print w/replies, xml ) Need Help??

in reply to Re: Creating an animated gif with GD
in thread Creating an animated gif with GD

First, you are accumulating the frames in $gifdata .= $frame->gifanimadd;, but then you print just the header info from the image into the file: print F $img->gif();. You should be printing the accumulated headers and frame data to the file: print F $gifdata;
Silly me, of course, I was doing it wrong. It is all working now, many thanks. Oh, and GD is about an order of magnitude faster than Imager. This would make a significant difference when I work with real data... 100 years worth (iow, 100 frames) of a few hundred thousand to a couple of million cells.
That doesn't affect a complete fix though because you're also confusing what constitutes a frame and what a complete animation. That is, you appear to be drawing a complete set of moving rectangles into each frame, rather than one rectangle at a different position in each frame.
No, thankfully, I got that part right.

Now I have to figure out whether an animated gif is appropriate for me (pretty universal readability... all browsers can), or if I should go the route of HTML5 video. What I would really like is a user-controllable scrub/scroll bar so the time-lapse can be changed to any time period. But, that is not a perl problem...

Many thanks again.


when small people start casting long shadows, it is time to go to bed

Replies are listed 'Best First'.
Re^3: Creating an animated gif with GD
by tonyc (Pilgrim) on Aug 31, 2010 at 00:24 UTC

    Is there any chance I could see the Imager version of the code?

    I'm curious about the performance difference.

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://856582]
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others studying the Monastery: (8)
As of 2018-06-18 16:44 GMT
Find Nodes?
    Voting Booth?
    Should cpanminus be part of the standard Perl release?

    Results (110 votes). Check out past polls.