1Devel::Cover::Test(3) User Contributed Perl DocumentationDevel::Cover::Test(3)
2
3
4

NAME

6       Devel::Cover::Test - Internal module for testing
7

VERSION

9       version 1.03
10

METHODS

12   new
13         my $test = Devel::Cover::Test->new($test, criteria => $string)
14
15       Constructor.
16
17       "criteria" parameter (optional, defaults to "statement branch condition
18       subroutine") is a space separated list of tokens.  Supported tokens are
19       "statement", "branch", "condition", "subroutine" and "pod".
20
21       More optional parameters are supported. Refer to "get_params" sub.
22
23   shell_quote
24         my $quoted_item = shell_quote($item)
25
26       Returns properly quoted item to cope with embedded spaces.
27
28   perl
29         my $perl = $self->perl()
30
31       Returns absolute path to Perl interpreter with proper -I options (blib-
32       wise).
33
34   test_command
35         my $command = $self->test_command()
36
37       Returns test command, made of:
38
39       absolute path to Perl interpreter
40       Devel::Cover -M option (if applicable)
41       test file
42       test file parameters (if applicable)
43
44   cover_command
45         my $command = $self->cover_command()
46
47       Returns test command, made of:
48
49       absolute path to Perl interpreter
50       absolute path to cover script
51       cover parameters
52
53   test_file
54         my $file = $self->test_file()
55
56       Returns absolute path to test file.
57
58   test_file_parameters
59         my $parameters = $self->test_file_parameters()
60
61       Accessor to test_file_parameters property.
62
63   cover_gold
64         my ($base, $v) = $self->cover_gold;
65
66       Returns the absolute path of the base to the golden file and the suffix
67       version number.
68
69       $base comes from the name of the test and $v will be $] from the
70       earliest perl version for which the golden results should be the same
71       as for the current $]
72
73   run_command
74         $self->run_command($command)
75
76       Runs command, most likely obtained from "test_command" sub.
77

BUGS

79       Huh?
80

LICENCE

82       Copyright 2001-2013, Paul Johnson (paul@pjcj.net)
83
84       This software is free.  It is licensed under the same terms as Perl
85       itself.
86
87       The latest version of this software should be available from my
88       homepage: http://www.pjcj.net
89
90
91
92perl v5.16.3                      2013-05-20             Devel::Cover::Test(3)
Impressum