File Coverage

blib/lib/Duadua/Parser/Bot/Bytespider.pm
Criterion Covered Total %
statement 13 13 100.0
branch 2 2 100.0
condition 2 3 66.6
subroutine 4 4 100.0
pod 1 1 100.0
total 22 23 95.6


line stmt bran cond sub pod time code
1             package Duadua::Parser::Bot::Bytespider;
2 11     11   71 use strict;
  11         23  
  11         431  
3 11     11   60 use warnings;
  11         22  
  11         544  
4 11     11   53 use Duadua::Util qw//;
  11         22  
  11         1314  
5              
6             sub try {
7 227     227 1 496 my ($class, $d) = @_;
8              
9 227 100 66     515 if ( $d->_contain('Bytespider;') && $d->_contain('bytedance.com') ) {
10 2         11 my $h = {
11             name => 'Bytespider',
12             is_bot => 1,
13             };
14              
15 2         10 return Duadua::Util->set_os($d, $h);
16             }
17             }
18              
19             1;
20              
21             __END__