#####
sub tail_file {
my $node = shift;
my $command = ();
if ($node =~ /all nodes/i) {
        $command = "tail -100f $logdir/syslog";
}else{
        $command = "tail -100f $logdir/syslog | grep -i $node";
        }
my $count = 0;
print "<h2>Tailing /var/log/syslog...</h2><br>\n";
open (TAIL,"$command |") or die "Can't open TAIL($command):$!\n";
while ($count <= $max) {
        chomp(my $line = <TAIL>);
        $line =~ s/\s/$space/g;
        print "$line<br>\n";
        $count++;
        maxed_out() if $count >= $max
}
}
#####