Re^4: Creating a perl script for database monitoring

Without the loop the programm do again unreadable results

File attente de datatable CRITICAL - File attente (ARRAY(0x10841e8) ARRAY(0x1084230) ARRAY(0x1084278))

With your instruction my result can be read but there is again the main problem to have result of each line of the sql request, i will think if an idea for not doing the loop

Comment on Re^4: Creating a perl script for database monitoring Download Code

Replies are listed 'Best First'.
Re^5: Creating a perl script for database monitoring by poj (Abbot) on Apr 08, 2016 at 15:41 UTC
Sorry my mistake, `$data` is a reference to an array-of-arrays rather than an array. Try this `my @count = map {$_->[0]} @$data; my $code_retour = $oracle_connector->check_threshold( check => \@count, warning => $oracle_connector->opts->warning, critical => $oracle_connector->opts->critical, ); $oracle_connector->plugin_exit($code_retour,"File attente (@count)" );` [download] poj	[reply] [d/l] [select]

Replies are listed 'Best First'.

Re^5: Creating a perl script for database monitoring
by poj (Abbot) on Apr 08, 2016 at 15:41 UTC

Sorry my mistake, $data is a reference to an array-of-arrays rather than an array. Try this

my @count = map {$_->[0]} @$data;
my $code_retour = $oracle_connector->check_threshold(
  check    => \@count,
  warning  => $oracle_connector->opts->warning,
  critical => $oracle_connector->opts->critical,
);
$oracle_connector->plugin_exit($code_retour,"File attente (@count)" );
[download]

[reply]
[d/l]
[select]