aboutsummaryrefslogtreecommitdiffstats
path: root/vespaclient
diff options
context:
space:
mode:
authorTor Egge <Tor.Egge@verizonmedia.com>2020-01-17 12:09:57 +0100
committerTor Egge <Tor.Egge@verizonmedia.com>2020-01-17 12:09:57 +0100
commitb3e72623dce8af9a609fc34786732ba3dfaafcbf (patch)
tree1cfc37600a628ee05588fd6b2a5b0ea81c8e0d82 /vespaclient
parentb324c19e007a7a57ba731ed72a01d35cd6937ed7 (diff)
Enable vespa site perl in bootstrap section of perl scripts.
Diffstat (limited to 'vespaclient')
-rwxr-xr-xvespaclient/src/perl/bin/GetClusterState.pl6
-rwxr-xr-xvespaclient/src/perl/bin/GetNodeState.pl6
-rwxr-xr-xvespaclient/src/perl/bin/SetNodeState.pl6
3 files changed, 9 insertions, 9 deletions
diff --git a/vespaclient/src/perl/bin/GetClusterState.pl b/vespaclient/src/perl/bin/GetClusterState.pl
index aee988c74ff..a60433cc391 100755
--- a/vespaclient/src/perl/bin/GetClusterState.pl
+++ b/vespaclient/src/perl/bin/GetClusterState.pl
@@ -39,7 +39,7 @@ sub findhome {
}
# Try the ROOT env variable
- $ROOT = $ENV{'ROOT'};
+ my $ROOT = $ENV{'ROOT'};
return $ROOT if is_vespa_home($ROOT);
# Try the script location or current dir
@@ -75,10 +75,10 @@ BEGIN {
}
my $VESPA_HOME = $ENV{'VESPA_HOME'};
+use lib $VESPA_HOME . "/lib/perl5/site_perl";
+
# END perl environment bootstrap section
-use lib $ENV{'VESPA_HOME'} . '/lib/perl5/site_perl';
-use lib $ENV{'VESPA_HOME'} . '/lib64/perl5/site_perl';
use Yahoo::Vespa::Defaults;
readConfFile();
diff --git a/vespaclient/src/perl/bin/GetNodeState.pl b/vespaclient/src/perl/bin/GetNodeState.pl
index c303b94be90..7b44275ce72 100755
--- a/vespaclient/src/perl/bin/GetNodeState.pl
+++ b/vespaclient/src/perl/bin/GetNodeState.pl
@@ -39,7 +39,7 @@ sub findhome {
}
# Try the ROOT env variable
- $ROOT = $ENV{'ROOT'};
+ my $ROOT = $ENV{'ROOT'};
return $ROOT if is_vespa_home($ROOT);
# Try the script location or current dir
@@ -75,10 +75,10 @@ BEGIN {
}
my $VESPA_HOME = $ENV{'VESPA_HOME'};
+use lib $VESPA_HOME . "/lib/perl5/site_perl";
+
# END perl environment bootstrap section
-use lib $ENV{'VESPA_HOME'} . '/lib/perl5/site_perl';
-use lib $ENV{'VESPA_HOME'} . '/lib64/perl5/site_perl';
use Yahoo::Vespa::Defaults;
readConfFile();
diff --git a/vespaclient/src/perl/bin/SetNodeState.pl b/vespaclient/src/perl/bin/SetNodeState.pl
index b1fc32c02b3..29e0bc161c0 100755
--- a/vespaclient/src/perl/bin/SetNodeState.pl
+++ b/vespaclient/src/perl/bin/SetNodeState.pl
@@ -39,7 +39,7 @@ sub findhome {
}
# Try the ROOT env variable
- $ROOT = $ENV{'ROOT'};
+ my $ROOT = $ENV{'ROOT'};
return $ROOT if is_vespa_home($ROOT);
# Try the script location or current dir
@@ -75,10 +75,10 @@ BEGIN {
}
my $VESPA_HOME = $ENV{'VESPA_HOME'};
+use lib $VESPA_HOME . "/lib/perl5/site_perl";
+
# END perl environment bootstrap section
-use lib $ENV{'VESPA_HOME'} . '/lib/perl5/site_perl';
-use lib $ENV{'VESPA_HOME'} . '/lib64/perl5/site_perl';
use Yahoo::Vespa::Defaults;
readConfFile();