| blib/lib/CGI/Carp.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 15 | 30 | 50.0 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 455 | 1 | 8 | 0 | $WRAP and $TO_BROWSER |
| 501 | 0 | 0 | 0 | print SAVEERR "Unable to redirect >&${no}: $!\n" and exit 1 |
| 507 | 1 | 15 | 3 | $EMIT_WARNINGS and @WARNINGS |
| 557 | 0 | 1 | 1 | $ENV{'MOD_PERL_API_VERSION'} and $ENV{'MOD_PERL_API_VERSION'} == 2 |
| 579 | 0 | 0 | 1 | defined $ENV{'HTTP_USER_AGENT'} and $ENV{'HTTP_USER_AGENT'} =~ /MSIE/ |
| 586 | 12 | 0 | 0 | defined $bytes_written and $bytes_written > 0 |
| 593 | 12 | 0 | 0 | defined $ENV{'HTTP_USER_AGENT'} and $ENV{'HTTP_USER_AGENT'} =~ /MSIE/ |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 350 | 0 | 0 | 4 | $routines{'fatalsToBrowser'} or $routines{'wrap'} |
| 452 | 10 | 0 | 11 | ref $arg or $arg =~ /\n$/ |
| 457 | 4 | 5 | 0 | $arg =~ /\n$/ or not exists $ENV{'MOD_PERL'} |