# HG changeset patch # User Heiko # Date 1445865380 -3600 # Node ID 603edb903b49a7d84b823db18d49df3059fe2c19 # Parent 01f49b9e842c6b29aed6e6f7b29e56c25440d29a use/no warnings depending on perl version diff -r 01f49b9e842c -r 603edb903b49 install --- a/install Wed Sep 09 10:43:34 2015 +0200 +++ b/install Mon Oct 26 14:16:20 2015 +0100 @@ -8,7 +8,8 @@ use autodie; use Getopt::Long; use English qw(-no_match_vars); -use if $^V >= v5.18 => (experimental => qw/smartmatch/); +use if (not $^V < v5.19) => (experimental => qw/smartmatch/); +no if ($^V < v5.19) => (warnings => 'experimental'); our $VERSION = '0.0';