# png good, gif bad
   print img({-src    => 'http://myserver/image.png',
              -width  => '500',
              -height => '60',
              -alt    => 'My Image',
              -title  => 'This is my image',
              });

##</code><code>##

   use strict;
   use Image::Magick;
   my $image  = Image::Magick->new();
   $x         = $image->Read(filename   =>'image.png');
   $x         = $image->Resize(geometry =>'640x480');
   $x         = $image->Write(filename  =>'image-th.png', 
                              quality   =>75);
   @$image    = ();