diff options
author | Daniel Friesel <derf@finalrewind.org> | 2013-09-05 19:01:22 +0200 |
---|---|---|
committer | Daniel Friesel <derf@finalrewind.org> | 2013-09-05 19:01:22 +0200 |
commit | 53e0db6d32d6e6f65c6b6b80bcabcde076982809 (patch) | |
tree | 96fcf180d37d07ecaecb1609d7037b1651737b6c | |
parent | f6490ac30e225d1fb2975f4f0ff8401eb95f8063 (diff) |
fix smartmatch warnings on perl >= 5.018
-rw-r--r-- | lib/Travel/Status/DE/DeutscheBahn.pm | 2 | ||||
-rw-r--r-- | lib/Travel/Status/DE/DeutscheBahn/Result.pm | 2 |
2 files changed, 4 insertions, 0 deletions
diff --git a/lib/Travel/Status/DE/DeutscheBahn.pm b/lib/Travel/Status/DE/DeutscheBahn.pm index d54847a..be46a4a 100644 --- a/lib/Travel/Status/DE/DeutscheBahn.pm +++ b/lib/Travel/Status/DE/DeutscheBahn.pm @@ -4,6 +4,8 @@ use strict; use warnings; use 5.010; +no if $] >= 5.018, warnings => "experimental::smartmatch"; + use Carp qw(confess); use LWP::UserAgent; use POSIX qw(strftime); diff --git a/lib/Travel/Status/DE/DeutscheBahn/Result.pm b/lib/Travel/Status/DE/DeutscheBahn/Result.pm index 0a9801b..c5a75b9 100644 --- a/lib/Travel/Status/DE/DeutscheBahn/Result.pm +++ b/lib/Travel/Status/DE/DeutscheBahn/Result.pm @@ -4,6 +4,8 @@ use strict; use warnings; use 5.010; +no if $] >= 5.018, warnings => "experimental::smartmatch"; + use parent 'Class::Accessor'; our $VERSION = '1.01'; |