| line |
true |
false |
branch |
|
192
|
0 |
1 |
unless ($pos) |
|
197
|
1 |
0 |
if ($nyFont) { } |
|
204
|
0 |
1 |
if ($runfil) |
|
207
|
0 |
1 |
if (wantarray) { } |
|
218
|
0 |
0 |
if ($fSize =~ /\d+\.?\d*/o) |
|
220
|
0 |
0 |
if ($runfil) |
|
224
|
0 |
0 |
unless ($pos) |
|
232
|
0 |
1 |
if ($pos) |
|
238
|
0 |
1 |
if (ref $param eq 'HASH') { } |
|
242
|
0 |
0 |
if ($key eq 'name') { } |
|
|
0 |
0 |
elsif ($key eq 'hidetoolbar' or $key eq 'hidemenubar' or $key eq 'hidewindowui' or $key eq 'fitwindow' or $key eq 'centerwindow') { } |
|
255
|
0 |
1 |
if defined $_[1] |
|
256
|
0 |
1 |
if defined $_[2] |
|
257
|
0 |
1 |
if defined $_[3] |
|
258
|
0 |
1 |
if defined $_[4] |
|
259
|
0 |
1 |
if defined $_[5] |
|
262
|
1 |
0 |
if ($filnamn ne '-') { } |
|
264
|
1 |
0 |
if ($ri > 0) { } |
|
266
|
0 |
1 |
$ddir ? : |
|
269
|
0 |
0 |
$ddir ? : |
|
272
|
1 |
0 |
if ($ri > 0) { } |
|
274
|
0 |
1 |
unless (-e $dirdel) |
|
280
|
0 |
0 |
if ($ri > 0) |
|
282
|
0 |
0 |
unless (-e $dirdel) |
|
293
|
0 |
1 |
if ($utfil_ref and $utfil_ref eq 'Apache2::RequestRec' or $utfil_ref eq 'Apache::RequestRec') { } |
|
|
0 |
1 |
elsif ($utfil_ref and $utfil_ref eq 'IO::String') { } |
|
304
|
0 |
1 |
unless open UTFIL, ">$utfil" |
|
311
|
0 |
1 |
if (defined $ldir) |
|
312
|
0 |
0 |
if ($utfil eq '-') |
|
315
|
0 |
0 |
if ($kortNamn) { } |
|
321
|
0 |
0 |
unless open RUNFIL, ">>$runfil" |
|
370
|
0 |
1 |
if ($runfil) |
|
373
|
0 |
0 |
exists $prefs{'hidetoolbar'} ? : |
|
374
|
0 |
0 |
exists $prefs{'hidemenubar'} ? : |
|
375
|
0 |
0 |
exists $prefs{'hidewindowui'} ? : |
|
376
|
0 |
0 |
exists $prefs{'fitwindow'} ? : |
|
377
|
0 |
0 |
exists $prefs{'centerwindow'} ? : |
|
385
|
0 |
1 |
if (defined $stream and length $stream > 0) |
|
407
|
0 |
1 |
if ($runfil and not $noLogg) |
|
412
|
0 |
1 |
unless ($pos) |
|
429
|
0 |
1 |
unless (defined $TxT) |
|
433
|
0 |
1 |
unless ($xPos =~ /\-?[\d\.]+/o and defined $xPos) |
|
436
|
0 |
1 |
unless ($yPos =~ /\-?[\d\.]+/o and defined $yPos) |
|
440
|
0 |
1 |
if ($runfil) |
|
445
|
1 |
0 |
if (length $stream < 3) |
|
450
|
0 |
1 |
unless ($aktuellFont[1]) |
|
456
|
1 |
0 |
$font{$fontname} ? : |
|
461
|
0 |
1 |
if (wantarray or $align ne 'left') |
|
464
|
0 |
0 |
if ($align eq 'right') { } |
|
|
0 |
0 |
elsif ($align eq 'center') { } |
|
476
|
1 |
0 |
if (not $rot) { } |
|
478
|
0 |
1 |
if ($ttfont) { } |
|
|
1 |
0 |
elsif (not $aktuellFont[5]) { } |
|
495
|
0 |
0 |
if ($rot =~ /q(\d)/io) |
|
496
|
0 |
0 |
if ($1 eq '1') { } |
|
|
0 |
0 |
elsif ($1 eq '2') { } |
|
512
|
0 |
0 |
$ttfont ? : |
|
520
|
0 |
1 |
unless ($pos) |
|
525
|
0 |
1 |
if (wantarray) { } |
|
528
|
0 |
0 |
if ($rot == 0) { } |
|
529
|
0 |
0 |
if ($align eq 'left') { } |
|
|
0 |
0 |
elsif ($align eq 'center') { } |
|
|
0 |
0 |
elsif ($align eq 'right') { } |
|
556
|
0 |
0 |
if ($runfil) |
|
561
|
0 |
0 |
unless ($pos) |
|
575
|
0 |
0 |
if (ref $param eq 'HASH') { } |
|
606
|
0 |
0 |
if (not exists $form{$fSource}) { } |
|
611
|
0 |
0 |
if ($effect eq 'load') { } |
|
618
|
0 |
0 |
if ($refNr) { } |
|
622
|
0 |
0 |
if ($tolerant) { } |
|
|
0 |
0 |
elsif (not defined $refNr) { } |
|
623
|
0 |
0 |
if (defined $refNr and $refNr eq '0') { } |
|
641
|
0 |
0 |
if (exists $knownToFile{$fSource}) { } |
|
649
|
0 |
0 |
if (exists $objRef{$namn}) { } |
|
653
|
0 |
0 |
if (not $form{$fSource}[8]) { } |
|
|
0 |
0 |
elsif ($effect ne 'load') { } |
|
656
|
0 |
0 |
if ($tolerant) { } |
|
670
|
0 |
0 |
if $refNr |
|
671
|
0 |
0 |
if ($effect eq 'print' and $form{$fSource}[8] and $refNr) |
|
672
|
0 |
0 |
unless (defined $defGState) |
|
676
|
0 |
0 |
if ($adjust) { } |
|
|
0 |
0 |
elsif ($x or $y or $rotate or $size != 1 or $xsize != 1 or $ysize != 1) { } |
|
700
|
0 |
0 |
if ($runfil) |
|
705
|
0 |
0 |
unless ($pos) |
|
708
|
0 |
0 |
if ($effect ne 'print' and $effect ne 'add') |
|
711
|
0 |
0 |
if (wantarray) { } |
|
713
|
0 |
0 |
if (exists $form{$fSource}[3]) |
|
731
|
0 |
0 |
unless ($pos) |
|
751
|
2 |
0 |
if (not exists $fontSource{$Font}) { } |
|
752
|
1 |
1 |
if (exists $stdFont{$Font}) { } |
|
756
|
2 |
0 |
unless (exists $font{$Font}) |
|
771
|
0 |
0 |
if (defined $font{$Font}[0]) { } |
|
774
|
0 |
0 |
if ($fontSource{$Font}[4] eq 'Standard') { } |
|
792
|
0 |
0 |
if (not $fontSource{$Font}[3]) { } |
|
809
|
0 |
2 |
unless ($pos) |
|
818
|
0 |
1 |
if ($checkCs) |
|
822
|
0 |
1 |
if ($compress and length $stream > 99) |
|
824
|
0 |
0 |
if (length $output > 25 and length $output < length $stream) |
|
830
|
0 |
1 |
unless ($parents[0]) |
|
840
|
0 |
1 |
if ($interAktivSida) |
|
850
|
1 |
0 |
if (scalar %sidFont) |
|
859
|
0 |
1 |
if (scalar %sidXObject) |
|
866
|
0 |
1 |
if (scalar %sidExtGState) |
|
873
|
0 |
1 |
if (scalar %sidPattern) |
|
880
|
0 |
1 |
if (scalar %sidShading) |
|
887
|
0 |
1 |
if (scalar %sidColorSpace) |
|
898
|
0 |
1 |
if (exists $resurser{$resursDict}) { } |
|
903
|
1 |
0 |
if (keys %resurser < 10) |
|
913
|
0 |
1 |
if (not $touchUp) { } |
|
922
|
0 |
0 |
if (defined $resursObjekt) |
|
932
|
0 |
0 |
if (not $compressFlag) { } |
|
948
|
0 |
0 |
unless (defined $confuseObj) |
|
968
|
1 |
0 |
if (not $compressFlag) { } |
|
995
|
0 |
1 |
if (@annots or %links and @{$links{'-1'};} or %links and @{$links{$tSida};}) |
|
1000
|
0 |
1 |
if (defined $AAPageSaved) |
|
1010
|
0 |
1 |
if ($counts[0] > 9) |
|
1016
|
0 |
1 |
unless ($pos) |
|
1019
|
1 |
0 |
if ($stream) |
|
1023
|
0 |
1 |
if ($docProxy) |
|
1032
|
0 |
1 |
unless (defined $objekt[$objNr]) |
|
1037
|
0 |
1 |
if (defined $NamesSaved) { } |
|
|
0 |
1 |
elsif (scalar %fields or scalar @jsfiler) { } |
|
1043
|
0 |
1 |
if (defined $AARootSaved) |
|
1046
|
0 |
1 |
if (scalar @inits or scalar %fields) |
|
1051
|
0 |
1 |
if (defined $AcroFormSaved) |
|
1055
|
0 |
1 |
if (scalar @bookmarks) |
|
1059
|
0 |
1 |
if (scalar %prefs) |
|
1061
|
0 |
0 |
if (exists $prefs{'hidetoolbar'}) |
|
1062
|
0 |
0 |
$prefs{'hidetoolbar'} ? : |
|
1065
|
0 |
0 |
if (exists $prefs{'hidemenubar'}) |
|
1066
|
0 |
0 |
$prefs{'hidemenubar'} ? : |
|
1069
|
0 |
0 |
if (exists $prefs{'hidewindowui'}) |
|
1070
|
0 |
0 |
$prefs{'hidewindowui'} ? : |
|
1073
|
0 |
0 |
if (exists $prefs{'fitwindow'}) |
|
1074
|
0 |
0 |
$prefs{'fitwindow'} ? : |
|
1077
|
0 |
0 |
if (exists $prefs{'centerwindow'}) |
|
1078
|
0 |
0 |
$prefs{'centerwindow'} ? : |
|
1101
|
1 |
0 |
if ($idTyp ne 'None') |
|
1112
|
0 |
1 |
if ($runfil) |
|
1113
|
0 |
0 |
if ($log) |
|
1141
|
0 |
0 |
unless ($parents[$j]) |
|
1174
|
0 |
0 |
if (defined $parents[$i]) |
|
1184
|
0 |
0 |
if ($parents[$j]) |
|
1217
|
0 |
0 |
if (-e $fil) |
|
1219
|
0 |
0 |
if ($cid) { } |
|
1221
|
0 |
0 |
if ($cid eq $tStamp) |
|
1229
|
0 |
0 |
if ($cid) |
|
1231
|
0 |
0 |
if (-e $fil2) |
|
1239
|
0 |
1 |
if ($idTyp eq 'rep') { } |
|
|
0 |
1 |
elsif ($idTyp eq 'add') { } |
|
1240
|
0 |
0 |
unless (defined $id) |
|
1267
|
0 |
0 |
unless (defined $string) |
|
1271
|
0 |
0 |
if (length $string == 0) |
|
1275
|
0 |
0 |
if (my($width) = ttfStrWidth($string, $Font, $FontSize)) |
|
1279
|
0 |
0 |
unless ($Font) |
|
1280
|
0 |
0 |
unless ($aktuellFont[2]) |
|
1286
|
0 |
0 |
unless (exists $PDF::Reuse::Util::font_widths{$Font}) |
|
1287
|
0 |
0 |
if (exists $stdFont{$Font}) |
|
1290
|
0 |
0 |
unless (exists $PDF::Reuse::Util::font_widths{$Font}) |
|
1295
|
0 |
0 |
if (ref $PDF::Reuse::Util::font_widths{$Font} eq 'ARRAY') { } |
|
1310
|
0 |
0 |
unless @_ |
|
1315
|
0 |
0 |
if (not $ttfont and $font{$selector}) |
|
1318
|
0 |
0 |
if $ttfont |
|
1321
|
0 |
0 |
unless ($ttfont) |
|
1352
|
0 |
0 |
if (wantarray) { } |
|
1372
|
0 |
0 |
if $font{$selector} |
|
1374
|
0 |
0 |
if ($font{$name}[1] eq $selector or $font{$name}[6] and $font{$name}[6]->filename eq $selector) |
|
1387
|
0 |
0 |
unless my $ttfont = findTTFont($selector) |
|
1406
|
0 |
0 |
unless my $obj = shift() |
|
1427
|
0 |
0 |
if (my($tail, $rest) = $data =~ /\A(.*?\nendobj\n)(.*)\z/s) { } |
|
1447
|
0 |
0 |
unless defined $self->{' objects'}{$obj->uid} |
|
1463
|
0 |
0 |
if $self->{'>done'}{$id} |
|
1509
|
0 |
0 |
unless my $font = $self->{'ttfont'}{' font'} |
|
1510
|
0 |
0 |
unless my $obj = $font->{'name'} |
|
1511
|
0 |
0 |
unless my $name = $obj->read->find_name(4) |
|
1530
|
0 |
0 |
if (my $ttfont = $self->{'ttfont'}) |
|
1531
|
0 |
0 |
if (my $font = delete $ttfont->{' font'}) |