Suppress given and when is experimental warnings

This commit is contained in:
mrkubax10 2023-09-18 18:00:52 +02:00
parent 3b3c82f417
commit c41173c06f
3 changed files with 3 additions and 0 deletions

View File

@ -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];

View File

@ -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];

View File

@ -30,6 +30,7 @@ use configuration;
use feature qw(switch);
use strict;
use warnings;
no warnings qw(experimental::smartmatch);
sub connectToServer {
my $aServer = $_[0];