use IO::Handle; # not needed for Perl 5.14+ # ... $logfile->autoflush();