line |
true |
false |
branch |
217
|
0 |
0 |
if (exists $args{'options'}) |
220
|
0 |
0 |
if (exists $args{'filename'}) { } |
|
0 |
0 |
elsif ($args{'format'}) { } |
238
|
0 |
0 |
if (defined $self->{'options'}{'tar_ignore'}) { } |
240
|
0 |
0 |
unless @{$self->{'options'}{'tar_ignore'};} |
271
|
0 |
0 |
unless $fn |
281
|
0 |
0 |
unless (defined $fields->{$f}) |
299
|
0 |
0 |
if defined $variant |
305
|
0 |
0 |
if ($@) |
309
|
0 |
0 |
if ($update_format) |
314
|
0 |
0 |
if $module->can('prerequisites') |
360
|
0 |
0 |
unless ($checksums->has_strong_checksums($file)) |
361
|
0 |
0 |
if ($self->{'options'}{'require_strong_checksums'}) { } |
370
|
0 |
0 |
if $warn_on_weak |
376
|
0 |
0 |
unless (exists $f->{'Source'} and exists $f->{'Version'}) |
393
|
0 |
0 |
unless defined $dir and -d $dir |
394
|
0 |
0 |
unless opendir my $dir_dh, $dir |
399
|
0 |
0 |
unless $opts{'include_main'} and /^\Q$basename\E\.orig\.tar\.$opts{'extension'}$/ |
431
|
0 |
0 |
unless (-e $upstream_key) |
481
|
0 |
0 |
if (length $ENV{'HOME'} and -r "$ENV{'HOME'}/.gnupg/trustedkeys.gpg") |
485
|
0 |
0 |
if (-r $vendor_keyring) |
504
|
0 |
0 |
unless ($self->parse_cmdline_option($option)) |
526
|
0 |
0 |
unless ($ok) |
527
|
0 |
0 |
if ($self->{'options'}{'ignore_bad_version'}) { } |
535
|
0 |
0 |
if ($self->{'options'}{'copy_orig_tarballs'}) |
545
|
0 |
0 |
unless (&check_files_are_the_same($src, $dst, 1)) |
546
|
0 |
0 |
unless cp($src, $dst) |
556
|
0 |
0 |
unless ($self->{'options'}{'skip_debianization'} or $self->{'no_check'}) |
563
|
0 |
0 |
if ($self->{'fields'}{'Format'} and $self->{'fields'}{'Format'} ne '1.0' and not $self->{'options'}{'skip_debianization'}) |
569
|
0 |
0 |
unless (-e $format_file) |
570
|
0 |
0 |
unless -e $srcdir |
578
|
0 |
0 |
if (not scalar @s) { } |
|
0 |
0 |
elsif (-f _) { } |
579
|
0 |
0 |
unless ($! == 2) |
583
|
0 |
0 |
unless $self->{'options'}{'skip_debianization'} |
585
|
0 |
0 |
unless chmod $s[2] | 73, $rules |
626
|
0 |
0 |
if ($self->{'checksums'}->has_file($fn)) |
654
|
0 |
0 |
unless ($opts{'nocheck'}) |
656
|
0 |
0 |
unless (defined $fields->{$f}) |
661
|
0 |
0 |
unless (defined $fields->{$f}) |
673
|
0 |
0 |
unless open my $dsc_fh, '>', $filename |