$imgparams{THREED}=5;
if ($image_x>$gallerycfg{'3DWIDTH'}){$imgparams{THREED}=1;
            }else{$imgparams{THREED}=0;}
    unless ($imgparams{THREED}<2){
        &writelog ("Error blah blah $Absolute_URL.",1);
        &dieerr("The image blah blah inconvenience.");
    }

##</code><code>##

$imgparams{THREED} = $image_x > $gallerycfg{'3DWIDTH'} ? 1 : 0;

##</code><code>##

unless (exists $imgparams{THREED}){
    &writelog ("Error blah blah $Absolute_URL.",1);
    &dieerr("The image blah blah inconvenience.");
}

##</code><code>##

my ($image_x, $image_y);
unless(($image_x,$image_y) = $image->Ping($Absolute_URL)) {
    &writelog ("Error blah blah $Absolute_URL.",1);
    &dieerr("The image blah blah inconvenience.");
}