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

#!/usr/bin/perl
use warnings;
use strict;
use Tk;

my $mw    = MainWindow->new;
my $image = $mw->Photo(-file => 'C:/wamp/bin/Perl/bin/ajax_loader.gif'
+);
$mw->Label(-image=>$image)->pack;
$mw->MainLoop;

[download]
This image is animated one and it runs successfully in IE.

Replies are listed 'Best First'.
Re: How to put animated GIF in a perl GUI created using Tk
by Khen1950fx (Canon) on May 08, 2012 at 12:52 UTC
    Try this... 
    #!/usr/bin/perl

use strict;
use warnings;
use Tk::Animation;

my $gif = 'C:/wamp/bin/Perl/bin/ajax_loader.gif';
my $mw = MainWindow->new;
my $img = $mw->Animation(
    '-format' => 'gif',
    '-file'   => $gif,
);
$mw->Label('-image' => $img)->pack;
$img->start_animation;
$mw->MainLoop;

    [download]
[reply]
[d/l]
Re: How to put animated GIF in a perl GUI created using Tk
by ww (Archbishop) on May 08, 2012 at 12:29 UTC
[reply]
Re: How to put animated GIF in a perl GUI created using Tk
by Anonymous Monk on May 08, 2012 at 12:27 UTC
[reply]

Back to Seekers of Perl Wisdom