| line |
true |
false |
branch |
|
92
|
0 |
70347 |
unless @_
|
|
100
|
70340 |
7 |
if (@_)
|
|
101
|
70340 |
0 |
if (scalar(@_) % 2 == 0) { }
|
|
112
|
0 |
0 |
defined $input_ang ? :
|
|
|
0 |
70347 |
unless defined $rad
|
|
125
|
38412 |
31935 |
if exists $args{'range'}
|
|
155
|
0 |
38410 |
unless defined $rad
|
|
186
|
12 |
84 |
if (@_)
|
|
191
|
26 |
70 |
if (defined $self->{'NDP'}) { }
|
|
211
|
6 |
81 |
if (@_)
|
|
216
|
13 |
74 |
if (defined $self->{'DELIM'}) { }
|
|
252
|
0 |
84 |
unless defined $res
|
|
255
|
0 |
84 |
if ($res > 9)
|
|
264
|
83 |
1 |
unless $res == 0
|
|
269
|
81 |
3 |
if (wantarray) { }
|
|
298
|
80 |
1 |
if ($ndp > 0)
|
|
309
|
50 |
31 |
if ($sign eq "+")
|
|
310
|
41 |
9 |
if ($self->range eq '2PI') { }
|
|
324
|
1 |
80 |
$ndp == 0 ? :
|
|
331
|
78 |
3 |
if (length $delim == 1) { }
|
|
393
|
38413 |
56 |
if (@_)
|
|
395
|
38413 |
0 |
if (defined $rng) { }
|
|
403
|
3 |
38410 |
if ($rng eq 'NONE') { }
|
|
|
29694 |
8716 |
elsif ($rng eq '2PI') { }
|
|
|
8716 |
0 |
elsif ($rng eq 'PI') { }
|
|
450
|
38702 |
2749 |
unless $format
|
|
453
|
184 |
2565 |
if ($format =~ /^d/) { }
|
|
|
16 |
2549 |
elsif ($format =~ /^s/) { }
|
|
|
2546 |
3 |
elsif ($format =~ /^r/) { }
|
|
|
0 |
3 |
elsif ($format =~ /^arcm/ or $format eq 'am') { }
|
|
|
0 |
3 |
elsif ($format =~ /^arcs/ or $format eq 'as') { }
|
|
|
3 |
0 |
elsif ($format =~ /^a/) { }
|
|
496
|
0 |
3 |
if $self->range eq "2PI"
|
|
551
|
1 |
40 |
if (@_)
|
|
553
|
1 |
0 |
if (defined $arg) { }
|
|
591
|
2 |
41 |
if (@_)
|
|
593
|
2 |
0 |
if (defined $arg) { }
|
|
666
|
0 |
72411 |
unless defined $input
|
|
670
|
214 |
72197 |
if (UNIVERSAL::can($input, "radians"))
|
|
679
|
28 |
72169 |
unless (defined $units)
|
|
681
|
0 |
28 |
unless defined $units
|
|
687
|
2047 |
70150 |
if ($units =~ /^s/) { }
|
|
|
32 |
70118 |
elsif ($units =~ /^d/) { }
|
|
|
25 |
70093 |
elsif ($units =~ /^arcs/ or $units eq 'as') { }
|
|
|
2 |
70091 |
elsif ($units =~ /^arcm/ or $units eq 'am') { }
|
|
700
|
0 |
2047 |
unless $j == 0
|
|
702
|
0 |
2047 |
if ($j == -1) { }
|
|
|
0 |
2047 |
elsif ($j == -2) { }
|
|
|
0 |
2047 |
elsif ($j == -3) { }
|
|
|
0 |
2047 |
elsif ($j == 1) { }
|
|
751
|
0 |
47 |
unless defined $input
|
|
758
|
34 |
13 |
if (not &looks_like_number($input)) { }
|
|
|
4 |
9 |
elsif ($input > 6.283185307179586232) { }
|
|
784
|
0 |
48 |
if $res > 9
|