|
|
@ -128,9 +128,9 @@ ADAPTER: for ( my $adp = 0; $adp < $adapters; $adp++ ) { |
|
|
|
open (CFGDSPLY, "$megacli -CfgDsply -a$adp -NoLog |") |
|
|
|
open (CFGDSPLY, "$megacli -CfgDsply -a$adp -NoLog |") |
|
|
|
|| die "error: Could not execute $megacli -CfgDsply -a$adp -NoLog"; |
|
|
|
|| die "error: Could not execute $megacli -CfgDsply -a$adp -NoLog"; |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
my $hba = 0; |
|
|
|
|
|
|
|
my $failgrouplist = 0; |
|
|
|
while (<CFGDSPLY>) { |
|
|
|
while (<CFGDSPLY>) { |
|
|
|
my $hba = 0; |
|
|
|
|
|
|
|
my $failgrouplist = 0; |
|
|
|
|
|
|
|
if ( m/Failed to get Disk Group list/ ) { |
|
|
|
if ( m/Failed to get Disk Group list/ ) { |
|
|
|
$failgrouplist = 1; |
|
|
|
$failgrouplist = 1; |
|
|
|
} |
|
|
|
} |
|
|
|