- add autoflush() for improved UI experience

perl/exit_strategy.pl

@@ -52,7 +52,8 @@ use XML::LibXML::XPathContext;
 use Getopt::Long;
 use constant DEBUG => 0; # no debug
 
-
+use IO::Handle;
+STDOUT->autoflush(1);
 # guarantee, that output will be UTF8
 binmode(STDOUT, ":encoding(UTF-8)");
 my $db_name="exit_strategy";