local $\ = "\n"; print($fh @_);