... my $fh = upload('image'); if ( !$cover_image && cgi_error ) { print header(-status=>cgi_error); } my $image; while (<$fh>) { $image .=$_; } my $num = insert_image_db($dbh, $user, $type, $image_title, $image); ...