open(FH, '>'.$image);

At that point, $image is an Image::Resize object, not a filename. Store your filename in a separate variable if you want to (try to) read from it and then write over it.