line |
!l |
l&&!r |
l&&r |
condition |
58
|
55 |
17 |
0 |
$args->{$_} and $mg->$_($args->{$_})
|
108
|
1400 |
413 |
157 |
$first_char =~ /\s/ && !($ident =~ /^$/)
|
|
0 |
157 |
0 |
($nested ? $ident =~ /^(:|\$|\%|\@|\&)/ ? do {
|
|
1748 |
0 |
17 |
$first_char =~ /\}/ && do {
|
405
|
86 |
2 |
0 |
$meta->{$name}{$_} and $mg->$_($self->replace_pe_string($meta->{$name}{$_}, $name))
|
434
|
6 |
0 |
0 |
$meta->{$name}{$_} and $mg->$_($self->replace_pe_string($meta->{$name}{$_}, $name))
|
488
|
38 |
2 |
0 |
$meta->{$name}{$_} and $mg->$_($self->replace_pe_string($meta->{$name}{$_}, $name))
|
733
|
6 |
0 |
15 |
$matches[1] =~ s/\,\s*(\d+)\s*$// && $1
|
734
|
6 |
0 |
15 |
$matches[1] =~ s/\,\s*(\d+)\s*$// && $1
|
855
|
0 |
8 |
6 |
@matches and $match =~ /(Map|Tuple|HashRef|ArrayRef|Dict)\[/
|
894
|
7 |
4 |
54 |
$type and not $type =~ /^(Optional|Any|Item)/
|
1016
|
12 |
0 |
30 |
$matches[1] =~ s/\,\s*(\d+)\s*$// && $1
|
1017
|
12 |
0 |
30 |
$matches[1] =~ s/\,\s*(\d+)\s*$// && $1
|
1123
|
104 |
8 |
12 |
$m++ == 0 && $d > 1
|
1137
|
4 |
18 |
12 |
@matches and $match =~ /(Map|Tuple|ArrayRef|Dict)\[/
|
1159
|
256 |
14 |
20 |
$m++ == 0 && $d > 1
|
1278
|
3 |
20 |
0 |
$meta->{'param'} && do {
|
line |
l |
!l&&r |
!l&&!r |
condition |
42
|
0 |
0 |
908 |
$self->debug or $self->verbose
|
178
|
3 |
1 |
11 |
$class{'CURRENT'}{'PARENT'} || $class{'CURRENT'}{'BASE'}
|
663
|
90 |
39 |
0 |
$error_string ||= "die qq{${type}: invalid value $value for accessor $name};"
|
746
|
15 |
0 |
6 |
$matches[1] or $matches[2]
|
817
|
7 |
0 |
0 |
$key_sub_code or $value_sub_code
|
1262
|
0 |
1 |
38 |
$meta->{'no_success_test'} or $meta->{'builder'}
|
|
1 |
8 |
30 |
$meta->{'no_success_test'} or $meta->{'builder'} or $meta->{'required'}
|
|
8 |
5 |
25 |
$meta->{'no_success_test'} or $meta->{'builder'} or $meta->{'required'} or $meta->{'default'}
|
1263
|
8 |
1 |
30 |
$meta->{'required'} || $meta->{'builder'}
|