use IO::Handle; OUTPUT_HANDLE->autoflush(1);