{
  foo() || die "foo() didn't return true";
  bar() || die "bar() didn't return true";
  ... and so on
}

##</code><code>##

every { block of statements }
run { block to be run after each statement in 1st block  }

##</code><code>##

every {
  foo();
  bar();
  ...
}
run {
  my $command = shift; # String representation of statement
  my $result = shift; # What the statement returned
  die "Command $command did not return true!" unless $result;
}