Suppress given and when is experimental warnings
This commit is contained in:
parent
3b3c82f417
commit
c41173c06f
@ -29,6 +29,7 @@ use frontend_routes;
|
||||
use feature qw(switch);
|
||||
use strict;
|
||||
use warnings;
|
||||
no warnings qw(experimental::smartmatch);
|
||||
|
||||
sub readFullFile {
|
||||
my $aFile = $_[0];
|
||||
|
@ -26,6 +26,7 @@ use threads::shared;
|
||||
use feature qw(switch);
|
||||
use strict;
|
||||
use warnings;
|
||||
no warnings qw(experimental::smartmatch);
|
||||
|
||||
sub verifyRequestPrivileges {
|
||||
my $aRequest = $_[0];
|
||||
|
Loading…
Reference in New Issue
Block a user