sub exec {
...
    ## retrieve an error message if unsuccessful
    my $error = $s->error
      if ($count > 0);
    ## log this action
    &log_action('error')
      if ($count > 0);
...
}