| 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) |