open(OUT, ">>../data/texts/log.txt") or die $!;
   print OUT $host, " "x(40-length($host)), "->     ", $xronos, "\n";
close(OUT);

and the the log also inside games.pl

<code>
open(OUT, ">>../data/texts/log.txt") or die $!;print(OUT $host, " "x(40-length($host)), "->     ", $xronos, "     ->     ", $game, "\n");
close(OUT);