use base qw/ App::ClusterSSH::Base /; # in object new method sub new { ( $class, $arg_ref ) = @_; my $self = $class->SUPER::new($arg_ref); return $self; }
Base object to provide some utility functions on objects - should not be used directly
These extra methods are provided on the object
Creates object. In higher debug levels the args are printed out.
Return the unique id of the object for use in subclasses, such as
$info_for{ $self->id } = $info
Returns current debug level
Set debug level to 'n' for all child objects.
Output @text on STDOUT if $level is the same or lower that debug_level
Set the Locale::Maketext language. Defaults to 'en'. Expects the App::ClusterSSH/L10N/{lang}.pm module to exist and contain all relevant translations, else defaults to English.
Using the App::ClusterSSH/L10N/{lang}.pm module convert the given text to appropriate language. See App::ClusterSSH::L10N for more details. Essentially a wrapper to maketext in Locale::Maketext
Output text on STDOUT.
Returned the object that is the parent of this one, if it was set when the object was created
Accessor to configured options, if it is set up by this point
Stub to allow program to exit neatly from wherever in the code
Returns whatever configuration object has been set up. Croaks if set_config hasnt been called
Set the config to the given value - croaks if has already been called
Code reference used to sort lists; if configured (and installed) use Sort;:Naturally, else use perl sort
Load in the specified file and return a hash, parsing the file depending on wther it is a config file (key = value) or cluster file (key value)
To install App::ClusterSSH, copy and paste the appropriate command in to your terminal.
cpanm
cpanm App::ClusterSSH
CPAN shell
perl -MCPAN -e shell install App::ClusterSSH
For more information on module installation, please visit the detailed CPAN module installation guide.