summaryrefslogtreecommitdiffstats
path: root/t/Nagios-Plugin-Performance.t
diff options
context:
space:
mode:
Diffstat (limited to 't/Nagios-Plugin-Performance.t')
-rw-r--r--t/Nagios-Plugin-Performance.t6
1 files changed, 5 insertions, 1 deletions
diff --git a/t/Nagios-Plugin-Performance.t b/t/Nagios-Plugin-Performance.t
index bbf0b20..6904f4c 100644
--- a/t/Nagios-Plugin-Performance.t
+++ b/t/Nagios-Plugin-Performance.t
@@ -1,4 +1,5 @@
1 1
2use warnings;
2use strict; 3use strict;
3use Test::More; 4use Test::More;
4use Nagios::Plugin::Functions; 5use Nagios::Plugin::Functions;
@@ -40,7 +41,7 @@ my @test = (
40 }, 41 },
41); 42);
42 43
43plan tests => (11 * scalar @test) + 175; 44plan tests => (11 * scalar @test) + 176;
44 45
45use_ok('Nagios::Plugin::Performance'); 46use_ok('Nagios::Plugin::Performance');
46diag "\nusing Nagios::Plugin::Performance revision ". $Nagios::Plugin::Performance::VERSION . "\n" if $ENV{TEST_VERBOSE}; 47diag "\nusing Nagios::Plugin::Performance revision ". $Nagios::Plugin::Performance::VERSION . "\n" if $ENV{TEST_VERBOSE};
@@ -349,4 +350,7 @@ is( $p[2]->min, undef, "min ok");
349is( $p[2]->max, undef, "max ok"); 350is( $p[2]->max, undef, "max ok");
350 351
351 352
353@p = Nagios::Plugin::Performance->parse_perfstring("processes=9;WKFLSV32.exe;9=");
354is_deeply( \@p, [], "Fails parsing correctly");
355
352# add_perfdata tests in t/Nagios-Plugin-01.t 356# add_perfdata tests in t/Nagios-Plugin-01.t