File Coverage

blib/lib/Dancer/Plugin/Showterm.pm

Criterion	Covered	Total	%
statement	21	21	100.0
branch			n/a
condition			n/a
subroutine	7	7	100.0
pod			n/a
total	28	28	100.0

package Dancer::Plugin::Showterm;
our $AUTHORITY = 'cpan:YANICK';
# ABSTRACT: Replay terminal typescript captures
$Dancer::Plugin::Showterm::VERSION = '0.0.2';

use strict;
use warnings;

use File::ShareDir::Tarball;

use Dancer ':syntax';
use Dancer::Plugin;
use Path::Tiny;

use Moo;
with 'MooX::Singleton';

has assets_dir => (
    is => 'ro',
    lazy => 1,
    default => sub {
        path(
            plugin_setting->{assets_dir}
                || File::ShareDir::Tarball::dist_dir('Dancer-Plugin-Showterm')
        );
    },
);

has stylesheet => (
    is => 'ro',
    default => sub {
        plugin_setting->{stylesheet};
    },
);

my $plugin = __PACKAGE__->instance;

get qr/.*\.showterm/ => sub {
    ( my $file = request->path ) =~ s/\.showterm$/\.typescript/;
    my $template = $plugin->assets_dir->child('showterm.html')->slurp;
    $template =~ s/__FILE__/$file/g;

    $template =~ s[(?=)][

    ] for grep { $_ } $plugin->stylesheet;

    $template;
};

get qr#/showterm/(.*)# => sub {
    my( $path ) = splat;
    send_file $plugin->assets_dir->child($path), system_path => 1;
};

1;

__END__