full stop rex execution

gistfile1.pl

use POSIX ":sys_wait_h";
use Rex -feature => ['exit_status'];


group "servers", "localhost", "127.0.1.2";


task test => group => servers => sub {
   my $output = run "hostname";
   say $output;
   die();
};

no warnings;
sub Rex::Fork::Task::wait {
  my ($self) = @_;
  my $rpid = waitpid($self->{pid}, &WNOHANG);
  if($rpid == -1) { $self->{'running'} = 0; }

  if(@Rex::Fork::Task::PROCESS_LIST && $Rex::Fork::Task::PROCESS_LIST[-1] != 0) {
    die("full stop.");
  }

  return $rpid;
}