line |
true |
false |
branch |
55
|
0 |
0 |
if (@_ >= 1 and &Scalar::Util::looks_like_number($_[0])) |
59
|
0 |
0 |
if (@_ == 1 and ref $_[0] and ref $_[0] eq 'HASH') { } |
83
|
0 |
0 |
if exists $args->{'done'} |
87
|
0 |
0 |
if exists $args->{$key} |
90
|
0 |
0 |
if (keys %$args) |
110
|
0 |
0 |
if @_ == 1 |
111
|
0 |
0 |
unless defined $amount |
118
|
0 |
0 |
unless defined $count |
120
|
0 |
0 |
if (defined $self->{'total'} and $count > $self->{'total'}) { } |
|
0 |
0 |
elsif ($count < 0) { } |
137
|
0 |
0 |
if @_ == 1 |
138
|
0 |
0 |
unless defined $amount |
146
|
0 |
0 |
if (defined $self->{'total'}) |
152
|
0 |
0 |
if ($self->remove) |
164
|
0 |
0 |
if (&in_global_destruction()) { } |
186
|
0 |
0 |
if @_ == 1 |
187
|
0 |
0 |
if (defined $total) |
188
|
0 |
0 |
unless $total >= 0 |
192
|
0 |
0 |
if (defined $total and $self->{'done'} > $total) |
203
|
0 |
0 |
if @_ == 1 |
213
|
0 |
0 |
if @_ == 1 |
223
|
0 |
0 |
if (@_ != 2 or not defined $style or not ref $style eq 'CODE' || ref $style eq '') |
226
|
0 |
0 |
unless (ref $style) |
227
|
0 |
0 |
unless (exists $STYLES{$style}) |
251
|
0 |
0 |
if ($lines == -1) |
260
|
0 |
0 |
unless ($self->_logging_mode) |
261
|
0 |
0 |
if $drawn |
269
|
0 |
0 |
unless $self->{'draw_ok'} |
270
|
0 |
0 |
if &Progress::Awesome::time() < $self->{'_next_draw'} and not $force |
273
|
0 |
0 |
if ($self->_logging_mode) { } |
289
|
0 |
0 |
if (defined $self->{'title'} and not $title_in_format) |
300
|
0 |
0 |
if ($format_line =~ /:bar/) { } |
|
0 |
0 |
elsif ($format_line =~ /:spacer/) { } |
302
|
0 |
0 |
if ($remaining_space >= 1) { } |
314
|
0 |
0 |
if ($remaining_space >= 1) { } |
324
|
0 |
0 |
if (not $drew_stretchy and defined $max_width) |
326
|
0 |
0 |
if (length $format_line > $max_width) { } |
335
|
0 |
0 |
unless $idx++ == $#lines |
345
|
0 |
0 |
if ($field eq 'bar' or $field eq 'spacer') { } |
|
0 |
0 |
elsif ($field eq ':') { } |
|
0 |
0 |
elsif ($field eq 'ts') { } |
|
0 |
0 |
elsif ($field eq 'done') { } |
|
0 |
0 |
elsif ($field eq 'left') { } |
|
0 |
0 |
elsif ($field eq 'total' or $field eq 'max') { } |
|
0 |
0 |
elsif ($field eq 'eta') { } |
|
0 |
0 |
elsif ($field eq 'rate') { } |
|
0 |
0 |
elsif ($field eq 'bytes') { } |
|
0 |
0 |
elsif ($field eq 'percent') { } |
|
0 |
0 |
elsif ($field eq 'title') { } |
356
|
0 |
0 |
unless $month = $MONTH[$month] |
363
|
0 |
0 |
defined $self->{'total'} ? : |
366
|
0 |
0 |
defined $self->{'total'} ? : |
372
|
0 |
0 |
$self->_percent == 100 ? : |
379
|
0 |
0 |
defined $pc ? : |
403
|
0 |
0 |
unless eval {
do {
require Term::ReadKey
}
} |
405
|
0 |
0 |
if ($result) |
407
|
0 |
0 |
if $^O eq 'MSWin32' or $^O eq 'cygwin' |
416
|
0 |
0 |
if (exists $self->{'_cached_logging_mode'}) |
427
|
0 |
0 |
if @$s > $MAX_SAMPLES |
436
|
0 |
0 |
if $self->{'done'} >= $self->{'total'} |
438
|
0 |
0 |
if not defined $rate or $rate <= 0 |
447
|
0 |
0 |
unless defined $self->{'total'} |
450
|
0 |
0 |
if @$s < 2 |
455
|
0 |
0 |
if $i + 1 > $#{$s;} |
468
|
0 |
0 |
unless defined $self->{'total'} |
470
|
0 |
0 |
$pc > 100 ? : |
479
|
0 |
0 |
unless (defined $percent) |
522
|
0 |
0 |
if (defined $percent) { } |
534
|
0 |
0 |
if $fillsize == 0 |
542
|
0 |
0 |
$floatpart == 0 ? : |
552
|
0 |
0 |
unless defined $format |
557
|
0 |
0 |
unless exists $FORMAT_STRINGS{$1} |
560
|
0 |
0 |
if ($line =~ /:(?:bar|spacer)/ > 1) |
572
|
0 |
0 |
unless defined $dur |
574
|
0 |
0 |
$dur < 86400 ? : |
|
0 |
0 |
$dur < 3600 ? : |
|
0 |
0 |
$dur < 60 ? : |
579
|
0 |
0 |
int $val == 1 ? : |
586
|
0 |
0 |
unless defined $rate |
588
|
0 |
0 |
$rate < 1000000000000 ? : |
|
0 |
0 |
$rate < 1000000000 ? : |
|
0 |
0 |
$rate < 1000000 ? : |
|
0 |
0 |
$rate < 1000 ? : |
602
|
0 |
0 |
unless defined $rate |
604
|
0 |
0 |
$rate < 1099511627776 ? : |
|
0 |
0 |
$rate < 1073741824 ? : |
|
0 |
0 |
$rate < 1048576 ? : |
|
0 |
0 |
$rate < 1024 ? : |
618
|
0 |
0 |
if (_term_is_256color()) { } |
628
|
0 |
0 |
if (_term_is_256color()) { } |
645
|
0 |
0 |
if (not defined $data->{'maxbars'} or $data->{'maxbars'} < @{$data->{'bars'};}) |
652
|
0 |
0 |
unless my $data = $REGISTRY{$bar->{'fh'}} |
657
|
0 |
0 |
if (@{$data->{'bars'};} == 0 and -t $bar->{'fh'}) |
664
|
0 |
0 |
unless defined $fh |
665
|
0 |
0 |
unless exists $REGISTRY{$fh} |
666
|
0 |
0 |
unless $REGISTRY{$fh}{'bars'} |