Bug 32678: Add new line in authorized values tests in search_for_data_inconsistencies.pl

[srvgit] / misc / z3950_responder.pl

diff --git a/misc/z3950_responder.pl b/misc/z3950_responder.pl
index 48609dd..3c782c4 100755 (executable)
--- a/misc/z3950_responder.pl
+++ b/misc/z3950_responder.pl
@@ -19,10 +19,9 @@
 
 use Modern::Perl;
 
-use Carp;
-use File::Basename;
-use Getopt::Long qw(:config no_ignore_case);
-use Pod::Usage;
+use File::Basename qw( fileparse );
+use Getopt::Long qw( GetOptions :config no_ignore_case );
+use Pod::Usage qw( pod2usage );
 
 use Koha::Config;
 use Koha::Z3950Responder;