File Coverage

blib/lib/Duadua/Parser/Bot/TikTokSpider.pm
Criterion Covered Total %
statement 10 10 100.0
branch 2 2 100.0
condition 3 3 100.0
subroutine 3 3 100.0
pod 1 1 100.0
total 19 19 100.0


line stmt bran cond sub pod time code
1             package Duadua::Parser::Bot::TikTokSpider;
2 11     11   1534 use strict;
  11         26  
  11         417  
3 11     11   57 use warnings;
  11         22  
  11         1575  
4              
5             sub try {
6 225     225 1 486 my ($class, $d) = @_;
7              
8 225 100 100     513 if ( $d->_contain_mozilla_top && $d->_contain('TikTokSpider;') ) {
9 1         5 my $h = {
10             name => 'TikTokSpider',
11             is_bot => 1,
12             };
13              
14 1         5 return $h;
15             }
16             }
17              
18             1;
19              
20             __END__