| blib/lib/Auth/GoogleAuth.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % | 
| condition | 17 | 26 | 65.3 | 
| line | !l | l&&!r | l&&r | condition | 
|---|---|---|---|---|
| 81 | 0 | 0 | 5 | $range =~ /^\d+$/ and $range >= 0 | 
| 84 | 4 | 4 | 1 | not $_ and $code eq $self->code($secret32, $timestamp, $interval) | 
| line | l | !l | condition | 
|---|---|---|---|
| 59 | 22 | 3 | $interval ||= 30 | 
| 76 | 5 | 0 | $code ||= '' | 
| 77 | 3 | 2 | $range ||= 0 | 
| 79 | 0 | 5 | $interval ||= 30 | 
| line | l | !l&&r | !l&&!r | condition | 
|---|---|---|---|---|
| 58 | 25 | 0 | 0 | $timestamp ||= time | 
| 78 | 5 | 0 | 0 | $timestamp ||= time | 
| 84 | 1 | 0 | 8 | not $_ and $code eq $self->code($secret32, $timestamp, $interval) or $code eq $self->code($secret32, $timestamp + $interval * $_, $interval) | 
| 1 | 2 | 6 | not $_ and $code eq $self->code($secret32, $timestamp, $interval) or $code eq $self->code($secret32, $timestamp + $interval * $_, $interval) or $code eq $self->code($secret32, $timestamp - $interval * $_, $interval) |