| line |
true |
false |
branch |
|
192
|
72 |
0 |
if @_ |
|
193
|
9 |
63 |
unless defined $_ |
|
194
|
4 |
59 |
if 'SCALAR' eq ref $_ |
|
195
|
40 |
19 |
$_ ? : |
|
203
|
138 |
0 |
if @_ |
|
205
|
0 |
83 |
$_ == -9**9**9 ? : |
|
|
4 |
83 |
$_ == 9**9**9 ? : |
|
|
87 |
4 |
defined($_ <=> 0) ? : |
|
|
91 |
47 |
&Scalar::Util::looks_like_number($_) ? : |
|
222
|
2 |
2 |
if (my $method_name = shift()) |
|
248
|
0 |
55 |
unless defined(my $class = &Scalar::Util::blessed($object)) |
|
254
|
53 |
2 |
if (do {
my $code = $self->_find_handler($class)
}) { } |
|
|
0 |
2 |
elsif (my $tag = $self->_objectify_via_tag($object)) { } |
|
|
0 |
2 |
elsif (my $to_json = $self->_objectify_via_json($object)) { } |
|
|
0 |
2 |
elsif (my $method = $self->overloaded($object)) { } |
|
|
0 |
2 |
elsif (my $attrkeyvals = $object->can('_attrkeyvals')) { } |
|
270
|
0 |
0 |
$data eq 'SCALAR' ? : |
|
|
0 |
0 |
$data eq 'REGEXP' ? : |
|
|
0 |
0 |
$data eq 'REF' ? : |
|
|
0 |
0 |
$data eq 'IO' ? : |
|
|
2 |
0 |
$data eq 'HASH' ? : |
|
|
0 |
2 |
$data eq 'GLOB' ? : |
|
|
0 |
2 |
$data eq 'FORMAT' ? : |
|
|
0 |
2 |
$data eq 'CODE' ? : |
|
|
0 |
2 |
$data eq 'ARRAY' ? : |
|
296
|
2 |
0 |
if @_ |
|
309
|
2 |
0 |
if @_ |
|
313
|
2 |
0 |
$self->get('vformat') ? : |
|
323
|
347 |
0 |
if @_ |
|
325
|
11 |
336 |
unless defined $_ |
|
327
|
57 |
279 |
if (defined(my $blessed = &Scalar::Util::blessed($_))) |
|
329
|
2 |
55 |
$blessed eq 'Regexp' ? : |
|
334
|
164 |
115 |
unless ($ref) |
|
338
|
55 |
107 |
$ref2 eq 'SCALAR' && &Scalar::Util::looks_like_number($_) ? : |
|
|
2 |
162 |
$ref2 eq 'VSTRING' ? : |
|
|
0 |
164 |
$ref2 eq 'LVALUE' ? : |
|
|
0 |
164 |
$ref2 eq 'GLOB' ? : |
|
348
|
2 |
0 |
$ref eq 'VSTRING' ? : |
|
|
57 |
2 |
$ref eq 'SCALAR' ? : |
|
|
0 |
59 |
$ref eq 'REGEXP' ? : |
|
|
12 |
59 |
$ref eq 'REF' ? : |
|
|
1 |
71 |
$ref eq 'LVALUE' ? : |
|
|
0 |
72 |
$ref eq 'IO' ? : |
|
|
11 |
72 |
$ref eq 'HASH' ? : |
|
|
0 |
83 |
$ref eq 'GLOB' ? : |
|
|
0 |
83 |
$ref eq 'FORMAT' ? : |
|
|
3 |
83 |
$ref eq 'CODE' ? : |
|
|
29 |
86 |
$ref eq 'ARRAY' ? : |
|
372
|
0 |
53 |
unless @_ |
|
378
|
51 |
0 |
@_ == 1 ? : |
|
385
|
10 |
1 |
@_ ? : |
|
393
|
9 |
1 |
@_ ? : |
|
402
|
4 |
1 |
$count == 1 ? : |
|
|
8 |
5 |
$count >= 2 ? : |
|
412
|
4 |
1 |
@_ ? : |
|
451
|
0 |
26 |
unless defined $literal |
|
452
|
0 |
26 |
unless length $literal |
|
509
|
0 |
0 |
$_[2] ? : |
|
510
|
0 |
0 |
$_[2] ? : |
|
515
|
0 |
0 |
$num eq $$ninf ? : |
|
|
0 |
0 |
$num eq $$inf ? : |
|
|
0 |
0 |
$num eq $$nan ? : |
|
518
|
0 |
0 |
$1 ? : |
|
524
|
0 |
13 |
unless &Scalar::Util::looks_like_number($num) |
|
528
|
13 |
0 |
$num =~ /\A$number_regex\z/u ? : |
|
|
0 |
13 |
$num == -9**9**9 ? : |
|
|
0 |
13 |
$num == 9**9**9 ? : |
|
|
0 |
13 |
!defined($num <=> 0) ? : |
|
567
|
56 |
37 |
${$_[0];} ? : |
|
570
|
0 |
44 |
$_[2] ? : |
|
572
|
1 |
1 |
&bool($_[0]) ? : |
|
578
|
10 |
11 |
${$_[0];} ? : |
|
|
10 |
15 |
$_[0] ? : |
|
|
21 |
25 |
ref $_[0] eq 'SCALAR' ? : |
|
|
10 |
46 |
&is_bool($_[0]) ? : |
|
582
|
10 |
46 |
if &Scalar::Util::blessed($_[0]) |