sub my_job {
  Shell::DWIM::run( '/dev/null', @_ );
  $Shell::DWIM::RUN_ERROR = 0;
  # Error? There is no error in my code
  return $Shell::DWIM::RUN_ERROR;
}

##</code><code>##

  sub RUN_ERROR {
    $RUN_ERROR
  }