| line |
true |
false |
branch |
|
18
|
0 |
0 |
unless $subrule =~ / :: | \. | -> /x |
|
21
|
0 |
0 |
if $positionals eq '' and @param == 1 |
|
37
|
0 |
0 |
unless $subrule =~ / :: | \. | -> /x |
|
40
|
0 |
0 |
if $positionals eq '' and @param == 1 |
|
116
|
0 |
0 |
unless ref $n eq 'HASH' |
|
139
|
0 |
0 |
if ref $program |
|
159
|
0 |
0 |
if ref $program |
|
176
|
0 |
0 |
if (ref $quantifier eq 'HASH') |
|
196
|
0 |
0 |
unless defined $sub |
|
206
|
0 |
0 |
if $sub eq '' |
|
230
|
0 |
0 |
if $capture_count > $max |
|
232
|
0 |
0 |
if $tmp |
|
245
|
0 |
0 |
if $tmp |
|
264
|
0 |
0 |
if ($name =~ /^\$/) |
|
266
|
0 |
0 |
if ($name =~ /^ \$ \^ ([^\s]*) /x) { } |
|
286
|
0 |
0 |
if ($name =~ /^%/) |
|
288
|
0 |
0 |
if $name =~ /::/ |
|
291
|
0 |
0 |
unless defined $value |
|
298
|
0 |
0 |
unless defined $_[1] |
|
300
|
0 |
0 |
if $char eq 'c' |
|
302
|
0 |
0 |
if $char eq 'C' |
|
305
|
0 |
0 |
if $char eq 'x' |
|
307
|
0 |
0 |
if $char eq 'X' |
|
310
|
0 |
0 |
if $char eq 'o' |
|
312
|
0 |
0 |
if $char eq 'O' |
|
315
|
0 |
0 |
if $char eq 'n' |
|
317
|
0 |
0 |
if $char eq 'N' |
|
322
|
0 |
0 |
if $char eq 'h' |
|
324
|
0 |
0 |
if $char eq 'H' |
|
327
|
0 |
0 |
if $char eq 'v' |
|
329
|
0 |
0 |
if $char eq 'V' |
|
333
|
0 |
0 |
if $char eq $_ |
|
334
|
0 |
0 |
if $char eq uc $_ |
|
336
|
0 |
0 |
if $char eq '\\' |
|
337
|
0 |
0 |
unless $char eq '!' |
|
362
|
0 |
0 |
if $code eq '{*}' |
|
364
|
0 |
0 |
if (ref $code and defined $Pugs::Compiler::Perl6::VERSION) { } |
|
384
|
0 |
0 |
if $code =~ /return/ |
|
400
|
0 |
0 |
if $modifier eq '?' |
|
401
|
0 |
0 |
if $modifier eq '!' |
|
404
|
0 |
0 |
if $modifier eq '?' or $modifier eq '!' |
|
425
|
0 |
0 |
if ref $name eq 'HASH' |
|
453
|
0 |
0 |
if $str eq '^' |
|
455
|
0 |
0 |
if $str eq ':' |
|
457
|
0 |
0 |
if $str eq '$' |
|
459
|
0 |
0 |
if $str eq '^^' |
|
461
|
0 |
0 |
if $str eq '$$' |
|
463
|
0 |
0 |
if $str eq '<<' |
|
465
|
0 |
0 |
if $str eq '>>' |
|
473
|
0 |
0 |
if $str eq 'ignorecase' |
|
481
|
0 |
0 |
$_[0] eq '\\' ? : |
|
482
|
0 |
0 |
unless $char =~ /!/ |
|
487
|
0 |
0 |
unless $cmd =~ /!/ |
|
497
|
0 |
0 |
unless defined $param_list |
|
512
|
0 |
0 |
if $modifier eq '!' |
|
515
|
0 |
0 |
if ($prefix eq '@') |
|
521
|
0 |
0 |
if ($prefix eq '%') |
|
525
|
0 |
0 |
if $cmd =~ /::/ |
|
534
|
0 |
0 |
if ($prefix eq '$') |
|
535
|
0 |
0 |
if ($cmd =~ /::/) |
|
551
|
0 |
0 |
if ($prefix eq q[']) |
|
553
|
0 |
0 |
unless $cmd =~ /!/ |
|
556
|
0 |
0 |
if ($prefix eq '"') |
|
561
|
0 |
0 |
if ($prefix eq '.') |
|
563
|
0 |
0 |
if ($cmd =~ /^{/) |
|
569
|
0 |
0 |
if ($prefix eq '?') |
|
572
|
0 |
0 |
if ($cmd =~ /^{/) |
|
578
|
0 |
0 |
if ($prefix =~ /[_[:alnum:]]/) |
|
579
|
0 |
0 |
if ($cmd eq 'cut') |
|
583
|
0 |
0 |
if ($cmd eq 'commit') |
|
590
|
0 |
0 |
unless defined $param_list |