use IO::Handle qw( ); STDOUT->autoflush(1); STDERR->autoflush(1);