Select Code to Download

$image->Read('How long am I');
($text_width) = $image->Get('width');

use Image::Magick;

...
$image->Read("Label: Test ");
my $l = $image->Get('width');
print $l, "\n";