|  line  | 
 true  | 
 false  | 
 branch  | 
 
| 
51
 | 
 0  | 
 0  | 
 if @_ != 1  | 
 
| 
53
 | 
 0  | 
 0  | 
 if ($x =~ /^-?\d+$/) { }  | 
 
| 
67
 | 
 0  | 
 0  | 
 if ($_[0] eq '-')  | 
 
| 
76
 | 
 0  | 
 0  | 
 if ($prev and $prev > $cur and _precedingOne($cur))  | 
 
| 
77
 | 
 0  | 
 0  | 
 _tWord($cur) ? :  | 
 
| 
80
 | 
 0  | 
 0  | 
 if (not $next and $flags & 1) { }  | 
 
| 
 | 
 0  | 
 0  | 
 elsif ($cur == 1 and $next) { }  | 
 
| 
 | 
 0  | 
 0  | 
 elsif ($prev and 1 < $prev and $prev < $cur and not _degeneratePlural($cur)) { }  | 
 
| 
81
 | 
 0  | 
 0  | 
 if ($cur > 1000000)  | 
 
| 
86
 | 
 0  | 
 0  | 
 if (_precedingOne($next))  | 
 
| 
87
 | 
 0  | 
 0  | 
 _tWord($next) ? :  | 
 
| 
106
 | 
 0  | 
 0  | 
 unless exists $bases{$num}  | 
 
| 
125
 | 
 0  | 
 0  | 
 if $x < 0  | 
 
| 
126
 | 
 0  | 
 0  | 
 if exists $bases{$x}  | 
 
| 
128
 | 
 0  | 
 0  | 
 if $num > $x  | 
 
| 
132
 | 
 0  | 
 0  | 
 $remainder ? :  |