Perl + Imagemagick

Hallo.

Porbiere gerade mit Perl und Imagemagick herum.
Folgendes Beispiel funktioniert auch sehr gut.

Leider kann ich in der Draw-Zeile nur mit einem Literal
arbeiten. Wenn ich eine Variable einsetze, dann kommt
nichts heraus.

Hat jemand schon mal vielleicht das Problem gehabt ?

Uli

--------------------------------------------------------------------
#!/usr/bin/perl
use Image::Magick;

$img = new Image::Magick;

$img -> Set ( size => '1653X2339' );
$img -> Read ( "xc:white" );

$img -> Set ( font => 'courier', pointsize => 30 );
$img -> Draw ( primitive => 'text', points => '30,30 "Text"');

$img -> set ( compression => "JPEG" );

$img -> write ( "test.tif" );

--------------------------------------------------------------------