File Coverage

blib/lib/PerlIO/via/GnuPG/Maybe.pm
Criterion Covered Total %
statement 10 10 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod n/a
total 14 14 100.0


line stmt bran cond sub pod time code
1             #
2             # This file is part of PerlIO-via-GnuPG
3             #
4             # This software is Copyright (c) 2013 by Chris Weyl.
5             #
6             # This is free software, licensed under:
7             #
8             # The GNU Lesser General Public License, Version 2.1, February 1999
9             #
10             package PerlIO::via::GnuPG::Maybe;
11             our $AUTHORITY = 'cpan:RSRCHBOY';
12             $PerlIO::via::GnuPG::Maybe::VERSION = '0.006';
13             # ABSTRACT: Layer to decrypt or pass-through unencrypted data on read
14              
15 1     1   781 use strict;
  1         2  
  1         27  
16 1     1   4 use warnings;
  1         2  
  1         31  
17              
18 1     1   4 use parent 'PerlIO::via::GnuPG';
  1         1  
  1         6  
19              
20 1     1   4 sub _passthrough_unencrypted { 1 }
21              
22             !!42;
23              
24             __END__