mariogolf_57851
Nimbostratus
Dec 20, 2010System::SystemInfo::get_fan_metrics
Can you help me formatting the output returned from this call please?
----------------------------------------------------------------------------
sub get_fan_metrics
----------------------------------------------------------------------------
sub get_fan_metrics()
{
$soapResponse = $SystemInfo->get_fan_metrics();
&checkResponse($soapResponse);
@PlatformFans = $soapResponse->result;
foreach $PlatformFans (@PlatformFans)
{
@FanMetric = @{$PlatformFans->{"fans"}};
print Dumper \@FanMetric;
}
}
$VAR1 = [
bless( [
bless( {
'metric_type' => 'FAN_INDEX',
'value' => '101'
}, 'System::FanMetric' ),
bless( {
'metric_type' => 'FAN_STATE',
'value' => '1'
}, 'System::FanMetric' ),
bless( {
'metric_type' => 'FAN_SPEED',
'value' => '4530'
}, 'System::FanMetric' )
], 'System::FanMetric[]' ),
bless( [
bless( {
'metric_type' => 'FAN_INDEX',
'value' => '102'
}, 'System::FanMetric' ),
bless( {
'metric_type' => 'FAN_STATE',
'value' => '1'
}, 'System::FanMetric' ),
bless( {
'metric_type' => 'FAN_SPEED',
'value' => '4440'
}, 'System::FanMetric' )
], 'System::FanMetric[]' ),
bless( [
bless( {
'metric_type' => 'FAN_INDEX',
'value' => '103'
}, 'System::FanMetric' ),
bless( {
'metric_type' => 'FAN_STATE',
'value' => '1'
}, 'System::FanMetric' ),
bless( {
'metric_type' => 'FAN_SPEED',
'value' => '4411'
}, 'System::FanMetric' )
], 'System::FanMetric[]' ),
bless( [
bless( {
'metric_type' => 'FAN_INDEX',
'value' => '104'
}, 'System::FanMetric' ),
bless( {
'metric_type' => 'FAN_STATE',
'value' => '1'
}, 'System::FanMetric' ),
bless( {
'metric_type' => 'FAN_SPEED',
'value' => '4272'
}, 'System::FanMetric' )
], 'System::FanMetric[]' ),
bless( [
bless( {
'metric_type' => 'FAN_INDEX',
'value' => '105'
}, 'System::FanMetric' ),
bless( {
'metric_type' => 'FAN_STATE',
'value' => '1'
}, 'System::FanMetric' ),
bless( {
'metric_type' => 'FAN_SPEED',
'value' => '4299'
}, 'System::FanMetric' )
], 'System::FanMetric[]' ),
bless( [
bless( {
'metric_type' => 'FAN_INDEX',
'value' => '106'
}, 'System::FanMetric' ),
bless( {
'metric_type' => 'FAN_STATE',
'value' => '1'
}, 'System::FanMetric' ),
bless( {
'metric_type' => 'FAN_SPEED',
'value' => '4245'
}, 'System::FanMetric' )
], 'System::FanMetric[]' )
];