NAME

MooX::Ipc::Cmd - Moo role for issuing commands, with debug support, and signal handling

VERSION

version 1.0.0

METHODS

_system(\@cmd', /%opts);

Runs a command like system call, with the output silently dropped, unless debug is on

• Params:

    $cmd : arrayref of the command to send to the shell
  

• Returns:

  exit code

• Exception

  Throws an error when case dies, will also log error using log::any category _cmd

_capture(\@cmd',\%opts);

Runs a command like qx call. Will display cmd executed = item Params :

This role provides the ability to capture system calls, and to execute system calls.

Features

• debug switch

• Prints output in realtime, in debug mode

• Handles signals, and kills via signal if configured too.

• Uses Log::Any for logging

• Command line option

  package Moo_Package; use Moo; use MooX::Options; # required before with statement with qw(MooX::Ipc::Cmd);

  has '+_cmd_kill' => (default=>1); # override default sub run { my $self=shift $self->_system(['cmd']); my @result=$self->_capture(['results']); } 1;

  package main use Log::Any::Adapter('Stdout'); #setup Log::Any::Adapter; my $app=Moo_Package->new_with_options(debug=>0,_cmd_kill=>0); #command line processing my $app=Moo_Package->new(debug=>0,_cmd_kill=>0); #no command line processing 1;

If set to 1 will send the propgate signal when cmd exits due to signal.

Reader: _cmd_kill

Default: 1

Mocks the cmd, does not run

Reader: mock

Default: 0

Command line option, via MooX::Options

AUTHOR

Eddie Ash eddie+cpan@ashfamily.net

COPYRIGHT AND LICENSE

This software is copyright (c) 2015 by Edward Ash.

This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.

POD ERRORS

Hey! The above document had some coding errors, which are explained below:

• Around line 38:

  Unknown directive: =SYNOPSIS

• Around line 87:

  Unknown directive: =attrib

• Around line 95:

  Unknown directive: =attrib