my $filename = $query->param('upload_field');
    my $type = $query->uploadInfo($filename)->{'Content-Type'};


##</code><code>##

    use Image::Size;
    my $filename = $query->param('upload_field');
    my ($width, $height, $type) = imgsize($filename);