use strict; use warnings; use Test::More; use CSS::Coverage; my @documents = ( \"

Hello world!

", ); my $report = CSS::Coverage->new( css => \"p em {}", documents => \@documents, )->check; is_deeply([$report->unmatched_selectors], [], "all selectors matched"); $report = CSS::Coverage->new( css => \"p strong {}", documents => \@documents, )->check; is_deeply([$report->unmatched_selectors], ["p strong"], "`p strong` did not match"); done_testing;