From 93155c82abf8c84eb96424b218c8f556c25f75c9 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Antoine=20Beaupr=C3=A9?= Date: Fri, 9 Mar 2012 19:09:15 -0500 Subject: [PATCH] remove warning --- plugins/relayd/relayd | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/plugins/relayd/relayd b/plugins/relayd/relayd index aeebffaf..64cec1ab 100755 --- a/plugins/relayd/relayd +++ b/plugins/relayd/relayd @@ -60,9 +60,10 @@ open(my $conf, "<", $configfile) or die "can't open $configfile: $!"; my $content = join("", <$conf>); while ( $content =~ /table\s*<([^>]*)>\s*{([^}]*)}/g) { my $hosts = $2; + print "table: $1, " if defined $Munin::Plugin::DEBUG; $hosts =~ s/#.*$//mg; # comments $hosts =~ s/^\s+//mg; # trim spaces before lines - print "table $1: $hosts\n" if defined $Munin::Plugin::DEBUG; + print "hosts: $hosts\n" if defined $Munin::Plugin::DEBUG; push @hosts , split /\s+/, $hosts; }