mirror of
https://github.com/vincentmli/bpfire.git
synced 2026-04-28 11:43:25 +02:00
perl-scripts: suppress smartmatch experimental warning
smartmatch was introduced with perl 5.10 and was marked as experimental in 5.14 Signed-off-by: Arne Fitzenreiter <arne_f@ipfire.org>
This commit is contained in:
@@ -20,6 +20,8 @@
|
|||||||
###############################################################################
|
###############################################################################
|
||||||
|
|
||||||
use strict;
|
use strict;
|
||||||
|
use experimental 'smartmatch';
|
||||||
|
|
||||||
no warnings 'uninitialized';
|
no warnings 'uninitialized';
|
||||||
|
|
||||||
package fwlib;
|
package fwlib;
|
||||||
|
|||||||
@@ -20,6 +20,7 @@
|
|||||||
###############################################################################
|
###############################################################################
|
||||||
|
|
||||||
use strict;
|
use strict;
|
||||||
|
use experimental 'smartmatch';
|
||||||
|
|
||||||
require '/var/ipfire/general-functions.pl';
|
require '/var/ipfire/general-functions.pl';
|
||||||
require "${General::swroot}/lang.pl";
|
require "${General::swroot}/lang.pl";
|
||||||
|
|||||||
@@ -20,6 +20,7 @@
|
|||||||
###############################################################################
|
###############################################################################
|
||||||
|
|
||||||
use strict;
|
use strict;
|
||||||
|
use experimental 'smartmatch';
|
||||||
|
|
||||||
use Net::IPv4Addr qw( :all );
|
use Net::IPv4Addr qw( :all );
|
||||||
use Switch;
|
use Switch;
|
||||||
|
|||||||
@@ -20,6 +20,7 @@
|
|||||||
###############################################################################
|
###############################################################################
|
||||||
|
|
||||||
use strict;
|
use strict;
|
||||||
|
use experimental 'smartmatch';
|
||||||
|
|
||||||
# enable only the following on debugging purpose
|
# enable only the following on debugging purpose
|
||||||
#use warnings;
|
#use warnings;
|
||||||
|
|||||||
@@ -20,6 +20,7 @@
|
|||||||
###############################################################################
|
###############################################################################
|
||||||
|
|
||||||
use strict;
|
use strict;
|
||||||
|
use ecperimental 'smartmatch';
|
||||||
|
|
||||||
# enable only the following on debugging purpose
|
# enable only the following on debugging purpose
|
||||||
#use warnings;
|
#use warnings;
|
||||||
|
|||||||
@@ -23,6 +23,7 @@ use strict;
|
|||||||
use Sort::Naturally;
|
use Sort::Naturally;
|
||||||
use utf8;
|
use utf8;
|
||||||
use feature 'unicode_strings';
|
use feature 'unicode_strings';
|
||||||
|
use experimental 'smartmatch';
|
||||||
|
|
||||||
no warnings 'uninitialized';
|
no warnings 'uninitialized';
|
||||||
|
|
||||||
|
|||||||
@@ -20,6 +20,7 @@
|
|||||||
###############################################################################
|
###############################################################################
|
||||||
|
|
||||||
use strict;
|
use strict;
|
||||||
|
use experimental 'smartmatch';
|
||||||
|
|
||||||
# enable only the following on debugging purpose
|
# enable only the following on debugging purpose
|
||||||
#use warnings;
|
#use warnings;
|
||||||
|
|||||||
Reference in New Issue
Block a user