| line |
true |
false |
branch |
|
108
|
0 |
0 |
if (not @_) { } |
|
124
|
5 |
0 |
if ($Use_Scalar_Util) { } |
|
128
|
13 |
6 |
(&_type($_[0]) || '') eq ($_[1] || '') ? : |
|
129
|
8 |
2 |
&Scalar::Util::blessed($_[0]) ? : |
|
132
|
0 |
5 |
if $@ |
|
156
|
0 |
0 |
if $@ |
|
253
|
8 |
4 |
@_ ? : |
|
|
3 |
1 |
@_ ? : |
|
|
0 |
1 |
@_ ? : |
|
|
6 |
4 |
@_ ? : |
|
|
0 |
0 |
@_ ? : |
|
|
2 |
1 |
@_ ? : |
|
|
0 |
1 |
@_ ? : |
|
372
|
3 |
0 |
$h ? : |
|
373
|
0 |
3 |
if @_ |
|
383
|
3 |
0 |
unless @_ > 0 |
|
391
|
0 |
0 |
@_ ? : |
|
401
|
0 |
0 |
unless 'ARRAY' eq ref $_[0] |
|
403
|
0 |
0 |
unless 'HASH' eq ref $_[0] |
|
411
|
0 |
0 |
if ref $_[0] or $_[0] eq 'Types::Core' |
|
413
|
0 |
0 |
@_ ? : |
|
414
|
0 |
0 |
if $objref |
|
504
|
0 |
0 |
@_ ? : |
|
505
|
0 |
0 |
unless defined $_ |
|
507
|
0 |
0 |
if /$numRE/ |
|
514
|
0 |
0 |
if (@_) |
|
515
|
0 |
0 |
@_ == 3 ? : |
|
|
0 |
0 |
@_ == 1 ? : |
|
516
|
0 |
0 |
if @_ > 1 |
|
518
|
0 |
0 |
unless defined $a |
|
519
|
0 |
0 |
unless defined $b |
|
520
|
0 |
0 |
if $dbg |
|
523
|
0 |
0 |
if ($dbg) |
|
528
|
0 |
0 |
if ($dta and $dtb) { } |
|
|
0 |
0 |
elsif ($dta ^ $dtb) { } |
|
|
0 |
0 |
elsif ($dta and $dtb and $ta ne $tb) { } |
|
529
|
0 |
0 |
&isnum($a) && &isnum($b) ? : |
|
532
|
0 |
0 |
if $dbg |
|
541
|
0 |
0 |
if ($dra ^ $drb) { } |
|
|
0 |
0 |
elsif ($dra and $drb and $ra ne $rb) { } |
|
545
|
0 |
0 |
if ($ta eq &SCALAR()) { } |
|
|
0 |
0 |
elsif ($ta eq &ARRAY()) { } |
|
|
0 |
0 |
elsif ($ta eq &HASH()) { } |
|
549
|
0 |
0 |
if $dbg |
|
550
|
0 |
0 |
if $r = @$a <=> @$b |
|
554
|
0 |
0 |
if $dbg |
|
556
|
0 |
0 |
if $dbg |
|
557
|
0 |
0 |
if $r |
|
564
|
0 |
0 |
if $dbg |
|
565
|
0 |
0 |
if $r |
|
568
|
0 |
0 |
if $dbg |
|
569
|
0 |
0 |
if $r |
|
574
|
0 |
0 |
if $dbg |
|
577
|
0 |
0 |
if $dbg |