improve displaylogcontent() sub fixing a warning

            }

        }

        if(@tail) {

            logmsg "=== File too long: lines here were removed\n";

            # This won't work properly if time stamps are enabled in logmsg

            logmsg join('',@tail[$#tail-200..$#tail]);

            my $tailshow = 200;

            my $tailskip = 0;

            my $tailtotal = scalar @tail;

            if($tailtotal > $tailshow) {

                $tailskip = $tailtotal - $tailshow;

                logmsg "=== File too long: $tailskip lines omitted here\n";

            }

            for($tailskip .. $tailtotal-1) {

                logmsg "$tail[$_]";

            }

        }

        close(SINGLE);

    }