File Coverage

blib/lib/Test/Apocalypse/DirChecks.pm
Criterion Covered Total %
statement 19 19 100.0
branch n/a
condition n/a
subroutine 6 6 100.0
pod 0 1 0.0
total 25 26 96.1


line stmt bran cond sub pod time code
1             #
2             # This file is part of Test-Apocalypse
3             #
4             # This software is copyright (c) 2014 by Apocalypse.
5             #
6             # This is free software; you can redistribute it and/or modify it under
7             # the same terms as the Perl 5 programming language system itself.
8             #
9 38     38   822352 use strict; use warnings;
  38     38   52  
  38         1269  
  38         162  
  38         42  
  38         1714  
10             package Test::Apocalypse::DirChecks;
11             $Test::Apocalypse::DirChecks::VERSION = '1.004';
12             BEGIN {
13 38     38   495 $Test::Apocalypse::DirChecks::AUTHORITY = 'cpan:APOCAL';
14             }
15              
16             # ABSTRACT: Plugin for Test::Dir
17              
18 38     38   157 use Test::More;
  38         76  
  38         298  
19 38     38   24585 use Test::Dir 1.006;
  38         62826  
  38         5195  
20              
21             sub do_test {
22 37     37 0 111 my @dirs = qw( lib t examples );
23 37         185 plan tests => scalar @dirs * 2;
24 37         5957 foreach my $d ( @dirs ) {
25 111         24272 dir_exists_ok( $d, "Directory '$d' exists" );
26 111         37444 ok( -r $d, "Directory '$d' is readable" );
27             }
28              
29 37         11951 return;
30             }
31              
32             1;
33              
34             __END__
35              
36             =pod
37              
38             =encoding UTF-8
39              
40             =for :stopwords Apocalypse Niebur Ryan
41              
42             =for Pod::Coverage do_test
43              
44             =head1 NAME
45              
46             Test::Apocalypse::DirChecks - Plugin for Test::Dir
47              
48             =head1 VERSION
49              
50             This document describes v1.004 of Test::Apocalypse::DirChecks - released October 24, 2014 as part of Test-Apocalypse.
51              
52             =head1 DESCRIPTION
53              
54             Encapsulates L<Test::Dir> functionality.
55              
56             =head1 SEE ALSO
57              
58             Please see those modules/websites for more information related to this module.
59              
60             =over 4
61              
62             =item *
63              
64             L<Test::Apocalypse|Test::Apocalypse>
65              
66             =back
67              
68             =head1 AUTHOR
69              
70             Apocalypse <APOCAL@cpan.org>
71              
72             =head1 COPYRIGHT AND LICENSE
73              
74             This software is copyright (c) 2014 by Apocalypse.
75              
76             This is free software; you can redistribute it and/or modify it under
77             the same terms as the Perl 5 programming language system itself.
78              
79             The full text of the license can be found in the
80             F<LICENSE> file included with this distribution.
81              
82             =head1 DISCLAIMER OF WARRANTY
83              
84             THERE IS NO WARRANTY FOR THE PROGRAM, TO THE EXTENT PERMITTED BY
85             APPLICABLE LAW. EXCEPT WHEN OTHERWISE STATED IN WRITING THE COPYRIGHT
86             HOLDERS AND/OR OTHER PARTIES PROVIDE THE PROGRAM "AS IS" WITHOUT WARRANTY
87             OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING, BUT NOT LIMITED TO,
88             THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
89             PURPOSE. THE ENTIRE RISK AS TO THE QUALITY AND PERFORMANCE OF THE PROGRAM
90             IS WITH YOU. SHOULD THE PROGRAM PROVE DEFECTIVE, YOU ASSUME THE COST OF
91             ALL NECESSARY SERVICING, REPAIR OR CORRECTION.
92              
93             IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING
94             WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MODIFIES AND/OR CONVEYS
95             THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR DAMAGES, INCLUDING ANY
96             GENERAL, SPECIAL, INCIDENTAL OR CONSEQUENTIAL DAMAGES ARISING OUT OF THE
97             USE OR INABILITY TO USE THE PROGRAM (INCLUDING BUT NOT LIMITED TO LOSS OF
98             DATA OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY YOU OR THIRD
99             PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER PROGRAMS),
100             EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE POSSIBILITY OF
101             SUCH DAMAGES.
102              
103             =cut