my $fh = $c->req->upload('original')->fh; $self->form->item->original($fh); $self->form->item->update; # The DBIx::Class row object comes from FormHandler, # but thats not important here #### my $fh = $c->req->upload('original')->fh; binmode $fh; my $img = Imager->new(fh => $fh) or die "Cannot read $fh ", $img->errstr; my $medium = $img->scale(xpixels => 640, ypixels => 640, type => 'min'); my $thumb = $img->scale(xpixels => 200, ypixels => 200, type => 'min'); $self->form->item->medium_pfad($medium); $self->form->item->thumb_pfad($thumb); $self->form->item->original($fh); $self->form->item->update; #### $img->write(file => 'a.jpg'); $medium->write(file => 'b.jpg'); $thumb->write(file => 'c.jpg'); $fho = new IO::File "> a.jpg"; $fhm = new IO::File "> b.jpg"; $fht = new IO::File "> c.jpg"; # Then use these filehandles...