I'm not very experienced with Perl. But I was stuck with the same problem with animated gifs and Tk::Animation.
I'm running Tk::Animation version 4.006. This seems to be patched with the line:
$obj->blank if $obj->{_blank_}; # helps some make others worse
But this line does not actually seem to blank the picture. When I examined the code of Tk::Animation I came to the conclusion that this is because the override function Tk::Animation::blank() gets called instead of Tk::Photo::blank(). Or is this a very silly conclusion by a rookie programmer?
Anyway I decided to comment out the entire function Tk::Animation::blank() and then replace the line
$obj->blank if $obj->{_blank_}; # helps some make others
worse
with just:
$obj->blank;
To my surprise this actually fixes the problem(!). When I call $anim->start_animation() the frames seem to get blanked before every new frame is drawn, giving me the desired effect...
Did I do something wrong or did I stumble on a bug in Tk::Animation?
JF