| line |
true |
false |
branch |
|
98
|
0 |
8 |
if ref $class |
|
101
|
0 |
8 |
if $debug |
|
102
|
0 |
8 |
if $debug |
|
103
|
0 |
8 |
if $debug |
|
104
|
0 |
8 |
if $debug |
|
106
|
0 |
8 |
if $debug |
|
109
|
0 |
8 |
if $debug |
|
110
|
0 |
8 |
if $debug |
|
111
|
0 |
8 |
if $debug |
|
112
|
0 |
8 |
if $debug |
|
113
|
0 |
8 |
if $debug |
|
114
|
0 |
8 |
if $debug |
|
115
|
0 |
8 |
if $debug |
|
124
|
0 |
0 |
if $debug |
|
125
|
0 |
8 |
if $debug |
|
130
|
0 |
0 |
if $debug |
|
180
|
0 |
56 |
if $debug |
|
197
|
8 |
0 |
unless ($dates_to_co) |
|
208
|
0 |
0 |
if length $rdate == 17 |
|
220
|
0 |
0 |
if $a lt $b |
|
226
|
0 |
0 |
if defined $date{$_} |
|
229
|
0 |
0 |
if ($debug) |
|
251
|
8 |
48 |
if ($ft) |
|
263
|
0 |
0 |
if (exists $_[0]->YYData->{'ERRMSG'}) |
|
279
|
0 |
1328 |
if pos $$input >= length $$input |
|
285
|
56 |
1272 |
if ($state eq 'longstring') |
|
289
|
0 |
56 |
unless $$input =~ /\G[\s\n]*@/cgs |
|
298
|
0 |
56 |
unless $$input =~ /\G[\s\n]*@/cgs |
|
313
|
1088 |
184 |
if ($state eq 'norm') |
|
316
|
8 |
1080 |
if $$input =~ /\Ghead/cg |
|
318
|
56 |
1024 |
if $$input =~ /\Gbranches/cg |
|
319
|
0 |
1024 |
if $$input =~ /\Gbranch/cg |
|
321
|
8 |
1016 |
if $$input =~ /\Gaccess/cg |
|
322
|
8 |
1008 |
if $$input =~ /\Gsymbols/cg |
|
323
|
8 |
1000 |
if $$input =~ /\Glocks/cg |
|
324
|
8 |
992 |
if $$input =~ /\Gstrict/cg |
|
325
|
8 |
984 |
if $$input =~ /\Gcomment/cg |
|
327
|
56 |
928 |
if $$input =~ /\Gdate/cg |
|
328
|
56 |
872 |
if $$input =~ /\Gauthor/cg |
|
329
|
56 |
816 |
if $$input =~ /\Gstate/cg |
|
331
|
56 |
760 |
if $$input =~ /\Gnext/cg |
|
333
|
56 |
704 |
if $$input =~ /\Glog/cg |
|
334
|
56 |
648 |
if $$input =~ /\Gtext/cg |
|
336
|
8 |
640 |
if $$input =~ /\Gdesc/cg |
|
338
|
328 |
312 |
if $$input =~ /\G;/cg |
|
339
|
0 |
312 |
if $$input =~ /\G:/cg |
|
343
|
176 |
136 |
if $$input =~ /\G([\d\.]+)/cg |
|
347
|
56 |
80 |
if $$input =~ /\G
((?:[\d\.]+)?) # {num}
([^\$,\.:;\@\x00-\x1F]) # idchar
([^\$,\.:;\@\x00-\x1F]|(?:[\d\.]+))* # {idchar | num}*
/cgx |
|
356
|
72 |
8 |
if $$input =~ /\G
@
((?:[^\@]|\@@)*)
@
/cgsx |
|
369
|
0 |
192 |
if ($state eq 'ids') |
|
373
|
0 |
0 |
if $$input =~ /\G
(?:
(\d?)
([^\$,\.:;\@\x00-\x1F])
([^\$,\.:;\@\x00-\x1F]*)
)*
/cgx |
|
387
|
8 |
184 |
if ($state eq 'symnums') |
|
391
|
8 |
0 |
if $$input =~ /\G
(?:
(\d*) # {digit}*
([^\$,\.:;\@\x00-\x1F]) # idchar
([^\$,\.:;\@\x00-\x1F]*) # {idchar | digit}*
: # :
([\d\.]+)[\s\n\r]* # num
)*
/cgsx |
|
407
|
8 |
176 |
if ($state eq 'idnums') |
|
411
|
8 |
0 |
if $$input =~ /\G
(?:
((?:[\d\.]+)?) # {num}
([^\$,\.:;\@\x00-\x1F]) # idchar
([^\$,\.:;\@\x00-\x1F]|(?:[\d\.]+))* # {idchar | num}*
: # :
([\d\.]+) # num
)*
/cgx |
|
428
|
56 |
120 |
if ($state eq 'ido') |
|
432
|
56 |
0 |
if $$input =~ /\G
(?:
((?:[\d\.]+)?) # {num}
([^\$,\.:;\@\x00-\x1F]) # idchar
([^\$,\.:;\@\x00-\x1F]|(?:[\d\.]+))* # {idchar | num}*
)?
/cgx |
|
446
|
112 |
8 |
if ($state eq 'nums') |
|
450
|
112 |
0 |
if $$input =~ /\G([\d\.]*)/cg |