| blib/lib/HTML/Email/Obfuscate.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % | 
| branch | 22 | 32 | 68.7 | 
| line | true | false | branch | 
|---|---|---|---|
| 136 | 0 | 3 | ref $_[0] eq 'HASH' ? : | 
| 146 | 1 | 2 | if $args{'javascript'} | 
| 147 | 1 | 2 | if $args{'lite'} | 
| 148 | 1 | 2 | if $args{'lite'} | 
| 167 | 3 | 0 | defined $_[0] ? : | 
| 168 | 3 | 0 | ref $either ? : | 
| 0 | 3 | unless my $self = ref $either ? $either : $either->new(@_) | |
| 190 | 3 | 0 | defined $_[0] ? : | 
| 191 | 3 | 0 | ref $either ? : | 
| 0 | 3 | unless my $self = ref $either ? $either : $either->new(@_) | |
| 201 | 46 | 2 | unless rand 1 < 0.1 | 
| 214 | 3 | 45 | if $char eq '@' | 
| 215 | 3 | 42 | if $char eq '.' | 
| 219 | 5 | 37 | rand 1 < 0.2 ? : | 
| 228 | 0 | 2 | $$self{'javascript'} ? : | 
| 238 | 0 | 0 | rand > 0.5 ? : |