diff --git a/misc-scripts/CopyDBoverServer.pl b/misc-scripts/CopyDBoverServer.pl index eed4b8fa873afa0163c0f048f124337599a26f31..209073dc12daab35c4274e979bf733fd317f3bcc 100755 --- a/misc-scripts/CopyDBoverServer.pl +++ b/misc-scripts/CopyDBoverServer.pl @@ -11,6 +11,9 @@ use Getopt::Long; use IO::File; use Sys::Hostname; use Tie::File; +use English qw( -no_match_vars ) ; + +$OUTPUT_AUTOFLUSH = 1; my $start_time = time();