[Perl] cacti script geeft verkeerde output.

[Knoetje]

Ik gebruik cacti (http://www.raxnet.net/products/cacti/)

Deze heeft een script om mysql te checken:

#!/usr/bin/perl
#get sql connections
$sql = `mysqladmin status | awk '{print $6 }'`;
chomp $sql;
print $sql;

dit geeft als uitvoer:

Uptime: 8671 Threads: 1 Questions: 8920 Slow queries: 0 Opens: 57 Flush tables: 1 Open tables: 51 Queries per second avg: 1.029

Dit is de uitvoer als het commando: mysqladmin status (op de prompt)

Maar als ik uitvoer mysqladmin status | awk '{print $6 }' dan print ie 8920 (wat ik ook wil hebben)


Wat doe ik verkeerd (perl n00b)

[Grum]

doe et bv zo (untested )

$sql = (split(/ /,`mysqladmin status`))[5]

zou moete werken als ik zo kijk

[tomato]

Misschien had je de $6 moeten escapen, tenminste, ik dacht dat de backtick operator ook aan variable interpolation doet.

[Knoetje]

Misschien had je de $6 moeten escapen, tenminste, ik dacht dat de backtick operator ook aan variable interpolation doet.

Klopt, dat deet ik dus verkeerd... heb van $6 \$6 gemaakt!

Thanx