Bug 20019: use Modern::Perl in misc perl scripts

[srvgit] / docs / CAS / CASProxy / examples / koha_webservice.pl

diff --git a/docs/CAS/CASProxy/examples/koha_webservice.pl b/docs/CAS/CASProxy/examples/koha_webservice.pl
index 1fc33ba..dbaa19e 100755 (executable)
--- a/docs/CAS/CASProxy/examples/koha_webservice.pl
+++ b/docs/CAS/CASProxy/examples/koha_webservice.pl
@@ -32,8 +32,7 @@ The Proxy Ticket, needed for check_api_auth, that will try to make the CAS Serve
 =cut 
 
 use utf8;
-use strict;
-use warnings;
+use Modern::Perl;
 binmode(STDOUT, ":utf8");
 
 use C4::Auth qw(check_api_auth);