my $fh = $self->cgi->upload( 'map' ); my $thumb = Image::Magick->new(); $thumb->Read( file => \*$fh ) or die "No read to Image::Magick obj: $! \n";