File Coverage

blib/lib/Bootylicious/Plugin/GoogleAnalytics.pm

Criterion	Covered	Total	%
statement	27	27	100.0
branch	3	6	50.0
condition	2	5	40.0
subroutine	6	6	100.0
pod	1	1	100.0
total	39	45	86.6

package Bootylicious::Plugin::GoogleAnalytics;

use strict;
use warnings;

use base 'Mojolicious::Plugin';

use Mojo::ByteStream 'b';

sub register {
    my ($self, $app, $conf) = @_;

    $conf ||= {};

    return unless $conf->{urchin};
    push @{$app->renderer->classes}, __PACKAGE__;

    $app->plugins->on(
        after_dispatch => sub {
            my ($c) = @_;

            return unless $c->res->code && $c->res->code == 200;

            my $body = $c->res->body;
            return unless $body;

            $c->stash(urchin => $conf->{urchin});

            my $ga_script = $c->render_to_string(
                'template',
                format => 'html'
            );

            $ga_script = b($ga_script)->encode('UTF-8');

            $body =~ s{}{$ga_script};
            $c->res->body($body);
        }
    );
}

1;
__DATA__