IBM::StorageSystem::Replication - Class for operations with IBM StorageSystem asynchronous replications
Version 0.01
use IBM::StorageSystem; use Date::Calc qw(date_to_Time Today_and_Now); 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"; # Generate an alert for any replication errors in the last six hours foreach my $task ( $ibm->get_replications ) { if ( $repl->status eq 'ERROR' and ( Date_to_Time( Today_and_Now ) - ( Date_to_Time( split /-| |\./, $repl->time ) ) ) > 21_600 ) { alert( "Replication failure for filesystem " . $repl->filesystem . " - log ID: " . $repl->log_id . ) } }
The name of the filesystem on which the replication is configured.
Returns the event log entry identifer for the replication task.
Returns the replication task completion status.
Returns a description of the replication task outcome.
Returns the completion time of the replication task in the format 'YYYY-MM-DD HH:MM:SS';
Luke Poskitt, <ltp at cpan.org>
<ltp at cpan.org>
Please report any bugs or feature requests to bug-ibm-v7000-replication at rt.cpan.org, or through the web interface at http://rt.cpan.org/NoAuth/ReportBug.html?Queue=IBM-StorageSystem-Replication. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes.
bug-ibm-v7000-replication at rt.cpan.org
You can find documentation for this module with the perldoc command.
perldoc IBM::StorageSystem::Replication
You can also look for information at:
RT: CPAN's request tracker (report bugs here)
http://rt.cpan.org/NoAuth/Bugs.html?Dist=IBM-StorageSystem-Replication
AnnoCPAN: Annotated CPAN documentation
http://annocpan.org/dist/IBM-StorageSystem-Replication
CPAN Ratings
http://cpanratings.perl.org/d/IBM-StorageSystem-Replication
Search CPAN
http://search.cpan.org/dist/IBM-StorageSystem-Replication/
Copyright 2012 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.
To install IBM::StorageSystem, copy and paste the appropriate command in to your terminal.
cpanm
cpanm IBM::StorageSystem
CPAN shell
perl -MCPAN -e shell install IBM::StorageSystem
For more information on module installation, please visit the detailed CPAN module installation guide.