my $original = new Image::Magick();
$original->Read('original.jpg');
$geometry = $original->Get('geometry');