| blib/lib/Profile/Log.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 41 | 54 | 75.9 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 132 | 4 | 1 | 2 | $$config{'modules'} and $$config{'modules'}{$caller_package} |
| 135 | 4 | 2 | 1 | $$config{'files'} and $$config{'files'}{$filename} |
| 182 | 22 | 8 | 2 | not $state and $k ne '0' |
| 22 | 0 | 8 | not $state and $k eq '0' | |
| 534 | 0 | 0 | 0 | $a[0] > 864000 and $b[0] > 864000 |
| 626 | 6 | 9 | 12 | $i * 2 <= $#{$$self{'t'};} and $$self{'t'}[2 * $i] =~ /^m(\d+)/ |
| 696 | 2 | 4 | 12 | $x && (defined $m || &$all_iter('name') =~ /^m\d+:/) |
| 4 | 4 | 4 | defined $m and &$all_iter('name') =~ /^m(\d+):/ |
| line | l | !l | condition |
|---|---|---|---|
| 140 | 3 | 4 | $import_config{'profile'} || 0 |
| 414 | 3 | 1 | $$self{'Z'} ||= [gettimeofday] |
| 558 | 2 | 0 | $$self{'Z'} ||= [gettimeofday] |
| 564 | 7 | 0 | $$self{'Z'} ||= [gettimeofday] |
| 679 | 1 | 1 | shift() || 0 |
| 739 | 4 | 0 | shift() || [gettimeofday] |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 115 | 2 | 5 | 0 | $config ||= do { my $config_file = $ENV{'PROFILE_LOG_CONFIG'} || "$ENV{'HOME'}/.profilerc.yml"; if (-e $config_file) { print STDERR 'Profile::Log' . ": loading settings from $config_file\n" if $ENV{'PROFILE_LOG_DEBUG'}; LoadFile($config_file); } else { +{}; } } |
| 116 | 1 | 0 | 4 | $ENV{'PROFILE_LOG_CONFIG'} || "$ENV{'HOME'}/.profilerc.yml" |
| 335 | 0 | 0 | 8 | $tz_offset ||= (localtime 0)[2] |
| 624 | 3 | 3 | 21 | $i == -1 or $i * 2 + 1 > $#{$$self{'t'};} |
| 696 | 6 | 0 | 12 | not $x && (defined $m || &$all_iter('name') =~ /^m\d+:/) or defined $m and &$all_iter('name') =~ /^m(\d+):/ |
| 763 | 4 | 0 | 25 | @_ == 2 or ref $_[0] |