diff --git a/src/tools/convertRelease.pl b/src/tools/convertRelease.pl
index db50e57bb..ac02802bd 100644
--- a/src/tools/convertRelease.pl
+++ b/src/tools/convertRelease.pl
@@ -17,7 +17,7 @@ eval 'exec perl -S $0 ${1+"$@"}'  # -*- Mode: perl -*-
 use strict;
 
 use FindBin qw($Bin);
-use lib "$Bin/../../lib/perl";
+use lib ("$Bin/../../lib/perl", $Bin);
 
 use Cwd qw(cwd abs_path);
 use Getopt::Std;
diff --git a/src/tools/expandVars.pl b/src/tools/expandVars.pl
index 79dfbfef0..2100315da 100644
--- a/src/tools/expandVars.pl
+++ b/src/tools/expandVars.pl
@@ -12,7 +12,7 @@
 use strict;
 
 use FindBin qw($Bin);
-use lib "$Bin/../../lib/perl";
+use lib ("$Bin/../../lib/perl", $Bin);
 
 use EPICS::Getopts;
 use EPICS::Path;
diff --git a/src/tools/fullPathName.pl b/src/tools/fullPathName.pl
index 99e22838b..15a614885 100644
--- a/src/tools/fullPathName.pl
+++ b/src/tools/fullPathName.pl
@@ -16,7 +16,7 @@ eval 'exec perl -S -w  $0 ${1+"$@"}'  # -*- Mode: perl -*-
 use strict;
 
 use FindBin qw($Bin);
-use lib "$Bin/../../lib/perl";
+use lib ("$Bin/../../lib/perl", $Bin);
 
 use Getopt::Std;
 use EPICS::Path;