File Coverage

lib/WebService/Braintree/DigestSHA256.pm
Criterion Covered Total %
statement 17 18 94.4
branch n/a
condition n/a
subroutine 6 7 85.7
pod 0 1 0.0
total 23 26 88.4


line stmt bran cond sub pod time code
1             package WebService::Braintree::DigestSHA256;
2             $WebService::Braintree::DigestSHA256::VERSION = '0.94';
3 20     20   313 use 5.010_001;
  20         66  
4 20     20   104 use strictures 1;
  20         129  
  20         756  
5              
6 20     20   6474 use Digest;
  20         8289  
  20         529  
7 20     20   116 use Digest::SHA;
  20         37  
  20         694  
8              
9 20     20   115 use vars qw(@ISA @EXPORT @EXPORT_OK %EXPORT_TAGS );
  20         34  
  20         932  
10 20     20   100 use Exporter;
  20         36  
  20         1498  
11             our @ISA = qw(Exporter);
12             our @EXPORT = qw(new);
13             our @EXPORT_OK = qw();
14              
15             sub new {
16 0     0 0   return Digest->new("SHA-256");
17             }
18              
19             1;
20             __END__