File Coverage

blib/lib/WebService/BuzzurlAPI/Request/Base.pm
Criterion Covered Total %
statement 13 18 72.2
branch n/a
condition n/a
subroutine 5 8 62.5
pod 4 4 100.0
total 22 30 73.3


line stmt bran cond sub pod time code
1             package WebService::BuzzurlAPI::Request::Base;
2              
3 3     3   19 use strict;
  3         7  
  3         97  
4 3     3   17 use warnings;
  3         5  
  3         100  
5 3     3   15 use base qw(WebService::BuzzurlAPI::Request);
  3         5  
  3         1935  
6 3     3   19 use Carp;
  3         38  
  3         528  
7              
8             our $VERSION = 0.02;
9              
10             sub filter_param {
11              
12 0     0 1 0 my($self, $param) = @_;
13             }
14              
15             sub make_request_url {
16              
17 0     0 1 0 my($self, $param) = @_;
18 0         0 return;
19             }
20              
21             sub make_request_content {
22              
23 0     0 1 0 my($self, $param) = @_;
24 0         0 return;
25             }
26              
27 3     3 1 28 sub is_post_request { 0 }
28              
29              
30             1;
31