From 6602a93dfb398afb1c566b8ef0d2ba1c7db3e091 Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Thu, 5 Sep 2013 19:03:18 +0200 Subject: fix smartmatch warnings on perl >= 5.018 --- cgi/index.pl | 2 ++ 1 file changed, 2 insertions(+) diff --git a/cgi/index.pl b/cgi/index.pl index 215cf03..10abe9b 100644 --- a/cgi/index.pl +++ b/cgi/index.pl @@ -6,6 +6,8 @@ use Travel::Status::DE::DeutscheBahn; use 5.014; use utf8; +no if $] >= 5.018, warnings => "experimental::smartmatch"; + our $VERSION = '0.04'; my $refresh_interval = 900; -- cgit v1.2.3