close $fh or die $! ? "Error closing pipe: $!"
	: "Piped open exit status: $?";