[PERL Image::Magick] method Annotate doesn't work

Hello,

I'v some troubles with the use of the fonction Annotate. This function doesn't
work...
I trie to write in a pricture, but nothing happen...
But, the other function like Draw looks good...


My code

use Image::Magick;
use strict;
use warnings;
use Carp;

my $image = Image::Magick->new;

$image->Set(size=>'300x300');
$image->ReadImage('white');
$image->Border(bordercolor=>'black',width=>'1', height=>'1');

$image->Draw(primitive=>'line',points=>"10,150 290, 150", stroke=>'red');

$image->Annotate(x => 50, y => 50,
                 font      => 'comic.ttf',
                 pointsize => 40,
                 fill      => 'red',
                 text      => 'Image Magick');

$image->Write(filename=>'image.png', compression=>'None');



Is someone help me?

Thanks

Michael Z.