Subclassed resultset with overridden search_rs()

Service.pm

# Wrapper to exclude services with 'deleted' status from search
sub search_rs {
    my $self = shift;

    my $next_method = $self->next::can('search_rs');

    my $status_alias = $self->current_source_alias . '.status';
    return $self->$next_method(@_)
        ->$next_method({ $status_alias => { '!=' => 'deleted' } });
}