diff options
Diffstat (limited to 't')
| -rw-r--r-- | t/Nagios-Plugin-Performance-02.t | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/t/Nagios-Plugin-Performance-02.t b/t/Nagios-Plugin-Performance-02.t new file mode 100644 index 0000000..c0c5a71 --- /dev/null +++ b/t/Nagios-Plugin-Performance-02.t | |||
| @@ -0,0 +1,13 @@ | |||
| 1 | |||
| 2 | use strict; | ||
| 3 | use Test::More tests => 3; | ||
| 4 | use_ok("Nagios::Plugin::Performance", use_die => 1); | ||
| 5 | |||
| 6 | eval { Nagios::Plugin::Functions::nagios_die("Testing") }; | ||
| 7 | is( $@, "NAGIOS-PLUGIN-PERFORMANCE-02 UNKNOWN - Testing\n", "use_die correctly set on import"); | ||
| 8 | |||
| 9 | |||
| 10 | use_ok("Nagios::Plugin::Performance"); | ||
| 11 | eval { Nagios::Plugin::Functions::nagios_die("Test OK exit", 0) }; | ||
| 12 | |||
| 13 | fail("Should not get here if code works correctly because prior nagios_die should have exited"); | ||
