line |
true |
false |
branch |
175
|
0 |
4 |
if (defined $opts{'-wordsp'} and not defined $opts{'wordsp'}) |
176
|
0 |
4 |
if (defined $opts{'-charsp'} and not defined $opts{'charsp'}) |
177
|
0 |
4 |
if (defined $opts{'-wordspa'} and not defined $opts{'wordspa'}) |
178
|
0 |
4 |
if (defined $opts{'-charspa'} and not defined $opts{'charspa'}) |
179
|
0 |
4 |
if (defined $opts{'-condw'} and not defined $opts{'condw'}) |
180
|
0 |
4 |
if (defined $opts{'-condc'} and not defined $opts{'condc'}) |
181
|
0 |
4 |
if (defined $opts{'-nocs'} and not defined $opts{'nocs'}) |
185
|
0 |
4 |
defined $opts{'wordsp'} ? : |
187
|
0 |
4 |
defined $opts{'charsp'} ? : |
189
|
0 |
4 |
defined $opts{'wordspa'} ? : |
191
|
0 |
4 |
defined $opts{'charspa'} ? : |
193
|
0 |
4 |
defined $opts{'condw'} ? : |
195
|
0 |
4 |
defined $opts{'condc'} ? : |
198
|
0 |
4 |
defined $opts{'nocs'} ? : |
199
|
0 |
4 |
if ($nocs) |
218
|
4 |
0 |
if (abs $overage > "0.1") |
226
|
16 |
62 |
if ($chars[$i] eq " ") |
232
|
0 |
4 |
if ($overage > 0) { } |
235
|
0 |
0 |
if ($overage > 0 and $num_spaces > 0 and $condw > 0) |
238
|
0 |
0 |
if ($val > $limit) |
243
|
0 |
0 |
if ($overage > 0 and $num_chars > 0 and $condc > 0) |
246
|
0 |
0 |
if ($val > $limit) |
255
|
4 |
0 |
if ($overage > 0 and $num_spaces > 0 and $wordsp > 0) |
258
|
1 |
3 |
if ($val > $limit) |
263
|
1 |
0 |
if ($overage > 0 and $num_chars > 0 and $charsp > 0) |
266
|
0 |
1 |
if ($val > $limit) |
271
|
0 |
0 |
if ($overage > 0 and $num_spaces > 0 and $wordspa > 0) |
274
|
0 |
0 |
if ($val > $limit) |
279
|
0 |
0 |
if ($overage > 0 and $num_chars > 0 and $charspa > 0) |
282
|
0 |
0 |
if ($val > $limit) |
292
|
0 |
4 |
if ($overage > "0.1") |
373
|
0 |
20 |
if (defined $opts{'-hyphenate'} and not defined $opts{'hyphenate'}) |
374
|
0 |
20 |
if (defined $opts{'-lang'} and not defined $opts{'lang'}) |
375
|
0 |
20 |
if (defined $opts{'-nosplit'} and not defined $opts{'nosplit'}) |
378
|
0 |
20 |
defined $opts{'hyphenate'} ? : |
405
|
13 |
106 |
if $overflowed |
409
|
13 |
7 |
if ($overflowed and not $over) |
410
|
13 |
0 |
if ($hyphenate and @line == 1 or @line > 1) |
424
|
0 |
20 |
if ($hyphenate and $overflowed) |
436
|
0 |
0 |
if (@line) { } |
446
|
0 |
0 |
if ($space > 0) |
471
|
0 |
0 |
if ($@) |
489
|
0 |
0 |
if (not @line) { } |
493
|
0 |
0 |
if ($wordLeft eq '') { } |
508
|
0 |
0 |
if ($wordLeft eq '') { } |
514
|
0 |
0 |
if $wordRight ne "" |
534
|
0 |
357 |
if ord $_ == 173 |
560
|
10 |
0 |
if (defined $opts{'-spillover'} and not defined $opts{'spillover'}) |
589
|
2 |
0 |
if (defined $opts{'-spillover'} and not defined $opts{'spillover'}) |
613
|
2 |
0 |
if (defined $opts{'-spillover'} and not defined $opts{'spillover'}) |
654
|
4 |
2 |
if (defined $opts{'-last_align'} and not defined $opts{'last_align'}) |
655
|
6 |
0 |
if (defined $opts{'-spillover'} and not defined $opts{'spillover'}) |
658
|
4 |
2 |
if (defined $opts{'last_align'}) |
659
|
0 |
4 |
if ($opts{'last_align'} =~ /^l/i) { } |
|
2 |
2 |
elsif ($opts{'last_align'} =~ /^c/i) { } |
|
2 |
0 |
elsif ($opts{'last_align'} =~ /^r/i) { } |
668
|
3 |
3 |
if ($ret eq '') { } |
670
|
1 |
2 |
if ($align eq 'l') { } |
|
1 |
1 |
elsif ($align eq 'c') { } |
766
|
5 |
7 |
if (defined $opts{'-align'} and not defined $opts{'align'}) |
767
|
0 |
12 |
if (defined $opts{'-pndnt'} and not defined $opts{'pndnt'}) |
773
|
5 |
7 |
if (defined $opts{'align'}) |
774
|
0 |
5 |
if ($opts{'align'} =~ /^l/i) { } |
|
1 |
4 |
elsif ($opts{'align'} =~ /^c/i) { } |
|
1 |
3 |
elsif ($opts{'align'} =~ /^r/i) { } |
|
3 |
0 |
elsif ($opts{'align'} =~ /^j/i) { } |
780
|
0 |
12 |
defined $opts{'pndnt'} ? : |
781
|
1 |
11 |
if ($align eq "c") |
791
|
0 |
20 |
if ($indent > 0 and $first_line) |
792
|
0 |
20 |
if ($indent < 0 and not $first_line) |
794
|
0 |
0 |
if ($lw < $width and $align eq 'l' || $align eq 'j') |
799
|
6 |
14 |
if ($align eq 'j') { } |
|
2 |
12 |
elsif ($align eq 'r') { } |
|
2 |
10 |
elsif ($align eq 'c') { } |
813
|
3 |
17 |
if ($height -= $leading) < 0 |
816
|
6 |
6 |
if (wantarray) |
869
|
0 |
2 |
if (defined $opts{'-pvgap'} and not defined $opts{'pvgap'}) |
872
|
0 |
2 |
defined $opts{'pvgap'} ? : |
882
|
0 |
6 |
if (length $overflow > 0) |
888
|
2 |
4 |
if (length $para > 0) |
897
|
0 |
6 |
if (length $para == 0 and $pvgap != 0) |
903
|
0 |
2 |
if (wantarray) |
1007
|
0 |
0 |
if (defined $opts{'-rotate'} and not defined $opts{'rotate'}) |
1008
|
0 |
0 |
if (defined $opts{'-color'} and not defined $opts{'color'}) |
1009
|
0 |
0 |
if (defined $opts{'-strokecolor'} and not defined $opts{'strokecolor'}) |
1010
|
0 |
0 |
if (defined $opts{'-charspace'} and not defined $opts{'charspace'}) |
1011
|
0 |
0 |
if (defined $opts{'-hscale'} and not defined $opts{'hscale'}) |
1012
|
0 |
0 |
if (defined $opts{'-wordspace'} and not defined $opts{'wordspace'}) |
1013
|
0 |
0 |
if (defined $opts{'-render'} and not defined $opts{'render'}) |
1014
|
0 |
0 |
if (defined $opts{'-right'} and not defined $opts{'right'}) |
1015
|
0 |
0 |
if (defined $opts{'-center'} and not defined $opts{'center'}) |
1016
|
0 |
0 |
if (defined $opts{'-left'} and not defined $opts{'left'}) |
1017
|
0 |
0 |
if (defined $opts{'-align'} and not defined $opts{'align'}) |
1022
|
0 |
0 |
if defined $opts{'rotate'} |
1025
|
0 |
0 |
if ($wastext) |
1034
|
0 |
0 |
ref $opts{'color'} ? : |
|
0 |
0 |
if defined $opts{'color'} |
1035
|
0 |
0 |
ref $opts{'strokecolor'} ? : |
|
0 |
0 |
if defined $opts{'strokecolor'} |
1039
|
0 |
0 |
if defined $opts{'charspace'} |
1040
|
0 |
0 |
if defined $opts{'hscale'} |
1041
|
0 |
0 |
if defined $opts{'wordspace'} |
1042
|
0 |
0 |
if defined $opts{'render'} |
1044
|
0 |
0 |
if (defined $opts{'right'} and $opts{'right'} or defined $opts{'align'} and $opts{'align'} =~ /^r/i) { } |
|
0 |
0 |
elsif (defined $opts{'center'} and $opts{'center'} or defined $opts{'align'} and $opts{'align'} =~ /^c/i) { } |
|
0 |
0 |
elsif (defined $opts{'left'} and $opts{'left'} or defined $opts{'align'} and $opts{'align'} =~ /^l/i) { } |
1060
|
0 |
0 |
if ($wastext) |