Luke Poskitt > IBM-StorageSystem > IBM::StorageSystem::Health

Download:
IBM-StorageSystem-0.045.tar.gz

Dependencies

Annotate this POD

View/Report Bugs
Module Version: 0.01   Source  

NAME ^

IBM::StorageSystem::Health - Class for operations with a IBM StorageSystem logical health stati

VERSION ^

Version 0.01

SYNOPSIS ^

IBM::StorageSystem::Health - Class for operations with a IBM StorageSystem logical health stati

        use IBM::StorageSystem;
        
        my $ibm = IBM::StorageSystem->new(      user            => 'admin',
                                        host            => 'my-v7000',
                                        key_path        => '/path/to/my/.ssh/private_key'
                                ) or die "Couldn't create object! $!\n";

        # Simple one-liner to print the sensor status and value for any error conditions.
        map { print join ' -> ', ( $_->sensor, $_->value."\n" ) } 
                grep { $_->status =~ /ERROR/ } $ibm->get_healths;

        # e.g.
        # CLUSTER -> Alert found in component cluster
        # MDISK -> Alert found in component mdisk
        # NODE -> Alert found in component node

METHODS ^

host

Returns the host to which the health status applies - this may either be an individual storage, mangement, interface or multi-role node, or may be a cluster level status.

sensor

Returns the system or component sensor to which the health status applies.

status

Returns the health sensor status (e.g. OK, ERROR, etc.).

value

Returns the health sensor status description.

AUTHOR ^

Luke Poskitt, <ltp at cpan.org>

BUGS ^

Please report any bugs or feature requests to bug-ibm-v7000-health at rt.cpan.org, or through the web interface at http://rt.cpan.org/NoAuth/ReportBug.html?Queue=IBM-StorageSystem-Health. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes.

SUPPORT ^

You can find documentation for this module with the perldoc command.

    perldoc IBM::StorageSystem::Health

You can also look for information at:

ACKNOWLEDGEMENTS ^

LICENSE AND COPYRIGHT ^

Copyright 2013 Luke Poskitt.

This program is free software; you can redistribute it and/or modify it under the terms of either: the GNU General Public License as published by the Free Software Foundation; or the Artistic License.

See http://dev.perl.org/licenses/ for more information.

syntax highlighting: