You should check the return value of Annotate, e.g.

$err = $image->Annotate(...);
warn $err if !ref $err;
[download]

See the error section on the ImageMagick Perl page for more info.