11_OWDevice: suppress warnings for smartmatch

git-svn-id: https://svn.fhem.de/fhem/trunk/fhem@11015 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
borisneubert 2016-03-06 18:09:03 +00:00
parent 0d2e790e85
commit d6a49b5f78

View File

@ -27,9 +27,12 @@ package main;
use strict; use strict;
use warnings; use warnings;
no if $] >= 5.017011, warnings => 'experimental::smartmatch';
use vars qw(%owdevice); use vars qw(%owdevice);
# 1-Wire devices (order by family code) # 1-Wire devices (order by family code)
# http://owfs.sourceforge.net/family.html # http://owfs.sourceforge.net/family.html