writing a gif

hello

i am trying to write the content of a canvas into a gif
but something of the alfabet fails

..
my $canvas = $fr_3->Canvas( -width => 360, -height => 360, -background 
=> 'white' )->pack;
my $p = $canvas->Photo(-width => 360, -height => 360 );
$canvas->createRectangle(0,0, 360, 360, -fill => 'white');
$canvas->createLine( 6, 18, 106, 206, -arrow => "both");
$canvas->createText( 36, 72, -text => "sammlung");
$p->write( "ding.gif", -format => 'gif');
..

the gif gets written but contains nothing

i miss something

but what ?

thanks for your time
kind regards
jmcs3

-++**==--++**==--++**==--++**==--++**==--++**==--++**==
This message was posted through the Stanford campus mailing list
server.  If you wish to unsubscribe from this mailing list, send the
message body of "unsubscribe ptk" to majordomo@xxxxxxxxxxxxxxxxxx