File Coverage

blib/lib/Plack/Test/Debugger.pm
Criterion Covered Total %
statement 13 13 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod n/a
total 18 18 100.0


line stmt bran cond sub pod time code
1             package Plack::Test::Debugger;
2              
3             # ABSTRACT: A subclass of Plack::Test suitable for testing the debugger
4              
5 8     8   300344 use strict;
  8         16  
  8         248  
6 8     8   31 use warnings;
  8         11  
  8         452  
7              
8             our $VERSION = '0.02';
9             our $AUTHORITY = 'cpan:STEVAN';
10              
11             # load the test implementation ...
12 8     8   154 BEGIN { $ENV{'PLACK_TEST_IMPL'} = 'MockHTTP::WithCleanupHandlers' }
13              
14             # now load Plack::Test ...
15 8     8   3082 use Plack::Test;
  8         3165  
  8         392  
16              
17             # inherit the ->import method from Plack::Test,
18             # this is one of those really horrid perl idioms
19             # that really should go away.
20 8     8   42 use parent 'Plack::Test';
  8         10  
  8         27  
21             our @EXPORT = qw[ test_psgi ];
22              
23             1;
24              
25             __END__