NAME

ETLp::Utility::Command - Runs Operating System Commands

SYNOPSIS

            

              
              
use FindBin qw($Bin);
use ETLp::Utility::Command;
my $os = ETLp::Utility::Command->new();
my ($output, $retcode) = $os->run('ls -l');
if ($retcode) {
    printf("Error %s\n", $os->errstr);
    printf("Outout %s\n", $output);
}
            
          

METHODS

new

Create a new ETLp::Utility::Command object.

Parameters

            

              
              
* time_out. optional. How long the command should run before aborting
            
          

run

Executes the supplied comand

Parameters

            

              
              
* An Operating System command (as a string);
            
          

Returns

            

              
              
* In a scalar context
    o The command's return code
     
* In an array context
    o The output of the command
    o The command's return code
            
          

errstr

            

              
              
Returns any error from the last run command
            
          

Paramaters

            

              
              
* None
            
          

Returns

            

              
              
* An error message (if there is one)
            
          

LICENSE AND COPYRIGHT

Copyright 2010 Redbone Systems Ltd

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.

The terms are in the LICENSE file that accompanies this application

1;