do not close fd passed to perl