http://www.perlmonks.org?node_id=1013255


in reply to Re: Close a file and reopen a new one at midnight
in thread Close a file and reopen a new one at midnight

I believe that this time it was put to test.
However, if for one minute data are not received, this condition is not met. if($hrmin == 1114)