| line |
true |
false |
branch |
|
334
|
0 |
0 |
unless $self->get_options(\@argv, 'help|?', sub {
pod2usage(1);
}
, 'man', sub {
pod2usage('-verbose', 2);
}
, 'a|include-non-numeric!', \$self->{'_include_non_numeric'}, 'autorun!', \$self->{'_autorun'}, 'close!', \$self->{'_close'}, 'c|confidence=f', \$self->{'_confidence_fraction'}, 'd|debug+', \$self->{'_debug'}, 'f|format=s', \$self->{'_format'}, 'F|fs|cs|fieldseparator|columnseparator=s', \$self->{'_fscode'}, 'i|input=s', sub {
$self->parse_io_option('input', @_);
}
, 'j|parallelism=i', \$self->{'_max_parallelism'}, 'k|key=s', \$self->{'_key_column'}, 'log!', \$self->{'_logprog'}, 'm|median!', \$self->{'_median'}, 'o|output=s', sub {
$self->parse_io_option('output', @_);
}
, 'output-on-no-input!', \$self->{'_output_on_no_input'}, 'q|quantile=i', \$self->{'_quantile'}, 's|sample!', \$self->{'_sample'}, 'S|pre-sorted+', \$self->{'_pre_sorted'}, 'T|tmpdir|tempdir=s', \$self->{'_tmpdir'}, 'saveoutput=s', \$self->{'_save_output'}) |
|
350
|
0 |
0 |
unless defined $self->{'_target_column'} |
|
352
|
0 |
0 |
if $self->{'_debug'} > 2 |
|
354
|
0 |
0 |
if $self->{'_debug'} > 2 |
|
357
|
0 |
0 |
unless defined $self->{'_target_coli'} |
|
359
|
0 |
0 |
if (defined $self->{'_key_column'}) |
|
362
|
0 |
0 |
unless defined $self->{'_key_coli'} |
|
369
|
0 |
0 |
if $self->{'_median'} |
|
370
|
0 |
0 |
if ($self->{'_quantile'}) |
|
375
|
0 |
0 |
if defined $self->{'_key_column'} |
|
376
|
0 |
0 |
if $self->{'_debug'} > 2 |
|
379
|
0 |
0 |
if defined $self->{'_fscode'} |
|
381
|
0 |
0 |
if $self->{'_debug'} > 2 |
|
383
|
0 |
0 |
if ($self->{'_quantile'} or $self->{'_median'}) { } |
|
385
|
0 |
0 |
if defined $self->{'_key_column'} |
|
390
|
0 |
0 |
if $self->{'_debug'} > 2 |
|
391
|
0 |
0 |
if (not $self->{'_pre_sorted'}) { } |
|
395
|
0 |
0 |
if defined $self->{'_max_parallelism'} |
|
396
|
0 |
0 |
if $self->{'_debug'} > 2 |
|
406
|
0 |
0 |
if $self->{'_debug'} > 2 |
|
408
|
0 |
0 |
if $self->{'_debug'} > 2 |
|
424
|
0 |
0 |
$x > $xi ? : |
|
440
|
0 |
0 |
unless $self->{'_quantile'} or $self->{'_median'} |
|
442
|
0 |
0 |
unless defined $effective_quantile |
|
446
|
0 |
0 |
if ($n <= 1) |
|
453
|
0 |
0 |
if $save_in->error |
|
458
|
0 |
0 |
$n >= $effective_quantile + 1 ? : |
|
471
|
0 |
0 |
if (--$replicates_left <= 0) |
|
473
|
0 |
0 |
if ref $fref ne 'ARRAY' |
|
478
|
0 |
0 |
if (defined $last_x and $x < $last_x) |
|
479
|
0 |
0 |
$self->{'_pre_sorted'} ? : |
|
484
|
0 |
0 |
if ($i == $median_i) |
|
485
|
0 |
0 |
unless defined $next_q_i |
|
487
|
0 |
0 |
if ($i == $next_q_i) |
|
503
|
0 |
0 |
if $self->{'_debug'} > 2 |
|
536
|
0 |
0 |
if (defined $self->{'_key_column'}) |
|
553
|
0 |
0 |
unless $self->{'_include_non_numeric'} |
|
560
|
0 |
0 |
if $self->{'_debug'} > 2 |
|
562
|
0 |
0 |
if ($self->{'_quantile'} or $self->{'_median'}) |
|
570
|
0 |
0 |
if $self->{'_debug'} > 2 |
|
581
|
0 |
0 |
if $self->{'_debug'} |
|
582
|
0 |
0 |
if $self->{'_debug'} |
|
584
|
0 |
0 |
if $@ |
|
587
|
0 |
0 |
if ($self->{'_quantile'} or $self->{'_median'}) |
|
588
|
0 |
0 |
if $self->{'_debug'} > 2 |
|
590
|
0 |
0 |
if $self->{'_debug'} > 2 |
|
597
|
0 |
0 |
if (defined $self->{'_sorter_fred'}) |
|
599
|
0 |
0 |
if $self->{'_debug'} > 2 |
|
602
|
0 |
0 |
if $self->{'_debug'} > 2 |
|
608
|
0 |
0 |
$n == 0 ? : |
|
616
|
0 |
0 |
if ($n == 0) { } |
|
620
|
0 |
0 |
$self->{'_sample'} ? : |
|
|
0 |
0 |
$n <= 1 || $max == $min ? : |
|
623
|
0 |
0 |
if ($stddev eq '-' or $mean eq '-' or $mean == 0) { } |
|
633
|
0 |
0 |
if ($n <= 1) { } |
|
639
|
0 |
0 |
$conf_half eq '-' ? : |
|
640
|
0 |
0 |
$conf_half eq '-' ? : |
|
661
|
0 |
0 |
!defined($min) || $min eq '-' ? : |
|
|
0 |
0 |
!defined($max) || $max eq '-' ? : |
|
669
|
0 |
0 |
if $self->{'_median'} |
|
670
|
0 |
0 |
if ($self->{'_quantile'}) |
|
675
|
0 |
0 |
if (defined $key_column) |
|
679
|
0 |
0 |
if ($n > 0 or $n == 0 and $self->{'_output_on_no_input'}) |
|
696
|
0 |
0 |
unless defined $self->{'_holdover_key'} |