use English;
$OUTPUT_AUTOFLUSH=1;

##</code><code>##

use FileHandle;
STDOUT->autoflush(1);