File Coverage

blib/lib/Duadua/Parser/Bot/GooglebotAd.pm

Criterion	Covered	Total	%
statement	16	16	100.0
branch	6	6	100.0
condition			n/a
subroutine	4	4	100.0
pod	1	1	100.0
total	27	27	100.0

package Duadua::Parser::Bot::GooglebotAd;
use strict;
use warnings;
use Duadua::Util;

sub try {
    my ($class, $d) = @_;

    return unless index($d->ua, 'Google') > -1;

    if ( index($d->ua, 'Mediapartners-Google') > -1 ) {
        my $h = {
            name   => 'Mediapartners-Google',
            is_bot => 1,
        };

        return Duadua::Util->set_os($d, $h);
    }

    if ( index($d->ua, 'AdsBot-Google') > -1 ) {
        return {
            name   => 'AdsBot-Google',
            is_bot => 1,
        };
    }
}

1;

__END__