diff options
| author | unknown <mwagner@here.mwagner.org> | 2004-06-29 02:13:24 -0500 |
|---|---|---|
| committer | unknown <mwagner@here.mwagner.org> | 2004-06-29 02:13:24 -0500 |
| commit | 7b6712a0614987ce49c9f523272a495537bc86a5 (patch) | |
| tree | e125ff2c5e38dfe0cde50704811cfc75fa2ebe1f /Build-tools | |
| parent | bd71177369cf6aa1b8a98721917188be0c38d6d5 (diff) | |
| download | mariadb-git-7b6712a0614987ce49c9f523272a495537bc86a5.tar.gz | |
my_md5sum:
Added code to use locally installed perl modules first
Build-tools/my_md5sum:
Added code to use locally installed perl modules first
Diffstat (limited to 'Build-tools')
| -rwxr-xr-x | Build-tools/my_md5sum | 13 |
1 files changed, 12 insertions, 1 deletions
diff --git a/Build-tools/my_md5sum b/Build-tools/my_md5sum index 20742ee2ed0..481a665af1a 100755 --- a/Build-tools/my_md5sum +++ b/Build-tools/my_md5sum @@ -10,10 +10,21 @@ # Written by Matt Wagner <matt@mysql.com> # use strict; + +# +# Use local perl libraries first. 'unshift' adds to the front of @INC +# The local perl library dir hidden is $HOME/.perllibs on each build host +# +BEGIN +{ + my $homedir= $ENV{HOME}; + unshift (@INC, "$homedir/.perllibs"); +} + use Digest::MD5; use Getopt::Long; -my $VER= "1.1"; +my $VER= "1.2"; # # Strip the leading path info off the program name ($0). We want 'my_md5sum' |