use IO::Handle; # thousands of lines just for autoflush :-(