diff --git a/configure/tools/fullPathName.pl b/configure/tools/fullPathName.pl
new file mode 100755
index 000000000..17d04c4a8
--- /dev/null
+++ b/configure/tools/fullPathName.pl
@@ -0,0 +1,8 @@
+eval 'exec perl -S -w  $0 ${1+"$@"}'  # -*- Mode: perl -*-
+        if 0; 
+
+use Cwd 'abs_path';
+my $dir;
+$dir = abs_path("$ARGV[0]");
+print "$dir\n";
+