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

[srvgit] / services / itemrecorddisplay.pl

diff --git a/services/itemrecorddisplay.pl b/services/itemrecorddisplay.pl
index f4bb384..2c2832f 100755 (executable)
--- a/services/itemrecorddisplay.pl
+++ b/services/itemrecorddisplay.pl
@@ -27,8 +27,7 @@ It uses PrepareItemrecordDisplay
 
 =cut
 
-use strict;
-use warnings;
+use Modern::Perl;
 
 use CGI qw ( -utf8 );
 use C4::Auth;