Bug 19992: use Modern::Perl in Admin perl scripts

[srvgit] / admin / clone-rules.pl

diff --git a/admin/clone-rules.pl b/admin/clone-rules.pl
index 9fd330f..73d0f54 100755 (executable)
--- a/admin/clone-rules.pl
+++ b/admin/clone-rules.pl
@@ -25,8 +25,7 @@
 #
 # The script can be called with one of the parameters, both or none
 
-use strict;
-#use warnings; FIXME - Bug 2505
+use Modern::Perl;
 use CGI qw ( -utf8 );
 use C4::Context;
 use C4::Output;