Remove old smartmatch warning workarround
This commit is contained in:
parent
9f2786d99d
commit
d138794924
1 changed files with 0 additions and 4 deletions
|
@ -31,10 +31,6 @@
|
||||||
use strict;
|
use strict;
|
||||||
no utf8;
|
no utf8;
|
||||||
|
|
||||||
# Suppress warnings about smartmatch being experimental
|
|
||||||
# Found here: http://blogs.perl.org/users/mike_b/2013/06/a-little-nicer-way-to-use-smartmatch-on-perl-518.html
|
|
||||||
no if $] >= 5.017011, warnings => 'experimental::smartmatch';
|
|
||||||
|
|
||||||
# Nagios
|
# Nagios
|
||||||
use lib "/usr/lib/nagios/plugins";
|
use lib "/usr/lib/nagios/plugins";
|
||||||
use utils qw(%ERRORS $TIMEOUT);
|
use utils qw(%ERRORS $TIMEOUT);
|
||||||
|
|
Loading…
Reference in a new issue