Handle AIX shipping new version of Perl.
git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@3890 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
		| @@ -6,6 +6,15 @@ BEGIN | ||||
|   $::XCATROOT = $ENV{'XCATROOT'} ? $ENV{'XCATROOT'} : -d '/opt/xcat' ? '/opt/xcat' : '/usr'; | ||||
| } | ||||
|  | ||||
| # if AIX - make sure we include perl 5.8.2 in INC path. | ||||
| #       Needed to find perl dependencies shipped in deps tarball. | ||||
| if ($^O =~ /^aix/i) { | ||||
|         use lib "/usr/opt/perl5/lib/5.8.2/aix-thread-multi"; | ||||
|         use lib "/usr/opt/perl5/lib/5.8.2"; | ||||
|         use lib "/usr/opt/perl5/lib/site_perl/5.8.2/aix-thread-multi"; | ||||
|         use lib "/usr/opt/perl5/lib/site_perl/5.8.2"; | ||||
| } | ||||
|  | ||||
| my $inet6support; | ||||
| if ($^O =~ /^aix/i) {  # disable AIX IPV6  TODO fix | ||||
|  $inet6support = 0; | ||||
|   | ||||
| @@ -7,6 +7,16 @@ BEGIN | ||||
| { | ||||
|     $::XCATROOT = $ENV{'XCATROOT'} ? $ENV{'XCATROOT'} : '/opt/xcat'; | ||||
| } | ||||
|  | ||||
| # if AIX - make sure we include perl 5.8.2 in INC path. | ||||
| #       Needed to find perl dependencies shipped in deps tarball. | ||||
| if ($^O =~ /^aix/i) { | ||||
|         use lib "/usr/opt/perl5/lib/5.8.2/aix-thread-multi"; | ||||
|         use lib "/usr/opt/perl5/lib/5.8.2"; | ||||
|         use lib "/usr/opt/perl5/lib/site_perl/5.8.2/aix-thread-multi"; | ||||
|         use lib "/usr/opt/perl5/lib/site_perl/5.8.2"; | ||||
| } | ||||
|  | ||||
| use lib "$::XCATROOT/lib/perl"; | ||||
| use Storable qw(freeze thaw); | ||||
| use xCAT::Utils; | ||||
|   | ||||
		Reference in New Issue
	
	Block a user