Robot/contrib-munin
2
0
Fork 0
mirror of https://github.com/munin-monitoring/contrib.git synced 2018-11-08 00:59:34 +01:00
Code Issues Releases Wiki Activity

fixed welcomemessage error

Browse source
This commit is contained in:
Tim Wulkau 2010-10-02 23:33:29 +02:00 committed by Steve Schnepp
parent d92232de0c
commit e3c3aae254
1 changed files with 5 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
plugins/other/teamspeak_user
View file

@ -7,6 +7,8 @@
# #
# by Tim Wulkau - www.wulkau.de # by Tim Wulkau - www.wulkau.de
# #
# 02.10.10 - v0.3
# -fixed welcomemessage error
# 31.01.10 - v0.2 # 31.01.10 - v0.2
# -fixed multiserver support # -fixed multiserver support
# -corrected usercount # -corrected usercount
@ -41,10 +43,10 @@ if(exists $ARGV[0] and $ARGV[0] eq "config")
else else
{ {
my $telnet = new Net::Telnet(Timeout=>5, Errmode=>"return", Prompt=>"/\r/"); my $telnet = new Net::Telnet(Timeout=>5, Errmode=>"return", Prompt=>"/\r/");
if ($telnet->open(Host=>$hostname, Port=>$port) != 1) { if (!$telnet->open(Host=>$hostname, Port=>$port)) {
die exit; die exit;
} }
$telnet->waitfor("/TS3/"); $telnet->waitfor("/Welcome to the TeamSpeak 3 ServerQuery interface/");
foreach my $server (@serverids) foreach my $server (@serverids)
{ {
$telnet->cmd("use sid=$server"); $telnet->cmd("use sid=$server");