File Coverage

blib/lib/App/Nopaste/Service/Shadowcat.pm
Criterion Covered Total %
statement 10 13 76.9
branch n/a
condition 0 3 0.0
subroutine 4 5 80.0
pod 1 2 50.0
total 15 23 65.2


line stmt bran cond sub pod time code
1 2     2   77685 use strict;
  2         12  
  2         61  
2 2     2   9 use warnings;
  2         4  
  2         100  
3             package App::Nopaste::Service::Shadowcat;
4             # ABSTRACT: Service provider for Shadowcat - http://paste.scsys.co.uk/
5              
6             our $VERSION = '1.012';
7              
8 2     2   409 use parent 'App::Nopaste::Service';
  2         250  
  2         9  
9              
10             sub available {
11 0     0 0 0 my $self = shift;
12 0         0 my %args = @_;
13 0   0     0 return !(exists($args{private}) && $args{private});
14             }
15              
16 1     1 1 100 sub uri { "http://paste.scsys.co.uk" }
17              
18             1;
19              
20             __END__