diff --git a/src/main/scripts/ncm-query b/src/main/scripts/ncm-query
index aced3f7..1b0aac9 100755
--- a/src/main/scripts/ncm-query
+++ b/src/main/scripts/ncm-query
@@ -133,7 +133,11 @@ toolsuite.
 
 package query;
 
-use lib "/usr/lib/perl";
+BEGIN {
+  pop @INC if $INC[-1] eq '.';
+  use lib "/usr/lib/perl";
+}
+
 use CAF::Application;
 use CAF::Reporter;
 use LC::Exception qw (SUCCESS throw_error);