Reading database from cover_db


------------------------------------------------- ------ ------ ------ ------
File                                                stmt branch   cond  total
------------------------------------------------- ------ ------ ------ ------
tests/t0                                           92.31  62.50  66.67  79.17
Total                                              92.31  62.50  66.67  79.17
------------------------------------------------- ------ ------ ------ ------


tests/t0

line  err   stmt branch   cond   code
1                                #!/usr/local/bin/perl
2                                
3                                # Copyright 2002, Paul Johnson (pjcj@cpan.org)
4                                
5                                # This software is free.  It is licensed under the same terms as Perl itself.
6                                
7                                # The latest version of this software should be available from my homepage:
8                                # http://www.pjcj.net
9                                
10                               use strict;
11                               use warnings;
12                               
13             1                 my @x;
14                               
15             1                 my $y = 1;
16                               
17             1                 for (0 .. 10)
              11                 
18                               {
19    ***     11     50            $y &&
20                                   $x[1]++;
21                               
22    ***     11    100     66     $y &&
23                                   $x[0]++ &&
24                                   $x[1]++;
25                               
26    ***     11     50            $x[2]++
27                                   if $y;
28                               
29            11                   for (0 .. 2)
              33                 
30                                 {
31            33                       $x[3]++;
32                                 }
33                               
34    ***     11     50            if ($y)
35                                 {
36            11                     $x[4]++;
37                                 }
38                                 else
39                                 {
40    ***      0                     $x[5]++;
41                                 }
42                               }
43                               
44                               # print join(", ", @x), "\n";


Branches
--------

line  err      %   true  false   branch
----- --- ------ ------ ------   ------
19    ***     50      0     11   if $y
22           100      1     10   if $y and $x[0]++
26    ***     50      0     11   if $y
34    ***     50     11      0   if ($y) { }


Conditions
----------

and 3 conditions

line  err      %     !l  l&&!r   l&&r   expr
----- --- ------ ------ ------ ------   ----
22    ***     66      0      1     10   $y and $x[0]++


