Set load path relative to current dir

diff --git a/swig/perl5/tests/loading.pl b/swig/perl5/tests/loading.pl
index 59463f2..9ad74a3 100644 (file)
--- a/swig/perl5/tests/loading.pl
+++ b/swig/perl5/tests/loading.pl
@@ -1,6 +1,7 @@
 #!/usr/bin/perl
 
-use lib '../../../build/swig/perl5';
+use FindBin qw($Bin);
+use lib '$Bin/../../../build/swig/perl5';
 
 use zypp;