The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

IPC::ShellCmd - Run a command with a given environment and capture output

SYNOPSIS

    my $isc = IPC::ShellCmd->new(["perl", "Makefile.PL"])
            ->working_directory("/path/to/IPC_ShellCmd-0.01")
            ->stdin(-filename => "/dev/null")
            ->add_envs(PERL5LIB => "/home/mbm/cpanlib/lib/perl5")
            ->chain_prog(
                IPC::ShellCmd::Sudo->new(
                        User => 'cpanbuild',
                        SetHome => 1,
                    )
            )->run();

    my $stdout = $isc->stdout();
    my $status = $isc->status();

DESCRIPTION

This module comes from the nth time I've had to implement a select loop and wanted appropriate sudo/su privilege magic, environment variables that are set in the child, working directories set etc.

It aims to provide a reasonable interface for setting up command execution environment (working directory, environment variables, stdin, stdout and stderr redirection if necessary), but allowing for ssh and sudo and magicing in the appropriate shell quoting.

It tries to be flexible about how you might want to capture output, exit status and other such, but in such a way as it's hopefully easy to understand and make it work.

Setup method calls are chainable in a File::Find::Rule kind of a way.

my $isc = IPC::ShellCmd->new(\@cmd, %opts)

Creates a new IPC::ShellCmd object linking to the command and arguments. Possible options:

-nowarn

Don't throw warnings for overwriting values that have already been set

-debug

Set the debug level

$isc->set_umask($mask)

Sets the umask that this command is going to have, and returns so that it can be chained.

$isc->working_dir([$path])

Sets the working directory that this command is going to run under, and returns so that it can be chained, or returns the current setting with no arguments.

$isc->add_envs($env1 => $val1 [, $env2 => $val2, ...])

Adds environment variables to be setup when the command is run. Returns so that it can be chained.

$isc->chain_prog($chain_obj, [$opt => $val, ...])

Adds a chain object, for example IPC::ShellCmd::Sudo->new(User => 'root') into the chain. Returns so that it can be chained.

Valid options are:

-include-stdin

If set, and stdin is a filename (rather than a pipe, open filehandle, or other type of descriptor) then the file will be included in the chain.

-include-stdout

As above but with stdout.

-include-stderr

As above but with stderr.

$isc->stdin($stdin)

$isc->stdin($type, $stdin)

The 1 argument form takes either

A scalar

This is the input to the command in full.

A scalar ref

This is a reference to the input that will be passed.

A code ref

This is expected to generate the text to send to stdin. It is called with an argument of the number of bytes that the caller wants to read. If it generates more, some may be lost - you have been warned.

The 2 argument form takes a type and then a ref, handle or other. Valid types:

-inherit

The argument to this is ignored. If specified this takes stdin from whatever the caller is reading from.

-file

The argument to this is a perl filehandle.

-fd

The argument to this is a system file descriptor.

-filename

The argument to this is a filename which is opened.

Both of these return for chaining. The default is an empty scalar.

$isc->stdout()

$isc->stderr()

These 0-argument forms return the captured stdout/stderr if the default stdout/stderr handler is set and run() has been called. If either has been setup elsewhere, then these will croak() an error.

$isc->stdout($value)

$isc->stderr($value)

$isc->stdout($type, $value)

$isc->stderr($type, $value)

These setup stdout/stderr as appropriate. The forms are similar to the stdin method above.

The 1 argument form takes either

A scalar ref

This is a reference to a scalar that will have the output appended to it.

A code ref

This code will be called (probably more than once) with a scalar of text to be appended which has been read from stdout/stderr.

The 2 argument form takes a type and then a ref, handle or other. Valid types:

-inherit

The argument to this is ignored. If specified this takes stdout/stderr from whatever the caller is set to.

-file

The argument to this is a perl filehandle.

-fd

The argument to this is a system file descriptor.

-filename

The argument to this is a filename which is opened.

All of these forms return for chaining. The default is that it will populate an internal variable to be used by the corresponding 0-argument form.

$isc->status()

Returns the exit status of the command if it got run.

$isc->run()

Runs the command with all the setup that has been done.

BUGS

Apart from the ones that are probably in there and that I don't know about, this is a very UNIX-centric view of the world, it really should cope with Win32 concepts etc.

SEE ALSO

IPC::ShellCmd::Generic, IPC::ShellCmd::Sudo, IPC::ShellCmd::SSH, IO::Select, IPC::Open3

AUTHORS

    Matthew Byng-Maddick <matthew.byng-maddick@bbc.co.uk> <mbm@colondot.net>

    Tomas Doran (t0m) <bobtfish@bobtfish.net>

COPYRIGHT

Copyright (c) 2009 the British Broadcasting Corperation.

LICENSE

This library is free software and may be distributed under the same terms as perl itself.