use
strict;
use
warnings;
use
utf8;
__PACKAGE__->load_components(
'Helper::Row::SubClass'
);
__PACKAGE__->subclass;
__PACKAGE__->table_class(
'DBIx::Class::ResultSource::View'
);
__PACKAGE__->table(
'device_dns_mismatch'
);
__PACKAGE__->result_source_instance->is_virtual(1);
__PACKAGE__->result_source_instance->view_definition(
<<'ENDSQL');
SELECT *
FROM device
WHERE dns IS NULL
OR name IS NULL
OR regexp_replace(lower(dns), ? || '$', '')
!= regexp_replace(lower(name), ? || '$', '')
ENDSQL
1;