Branch Coverage

blib/lib/App/RL/Command/position.pm
Criterion Covered Total %
branch 30 40 75.0


line true false branch
37 2 4 if (@{$args;} < 2)
44 0 7 if lc $_ eq 'stdin'
45 1 6 unless (Path::Tiny::path($_)->is_file)
50 1 2 if ($opt->{'op'} =~ /^overlap/i) { }
1 1 elsif ($opt->{'op'} =~ /^non/i) { }
1 0 elsif ($opt->{'op'} =~ /^superset/i) { }
63 0 3 if (not exists $opt->{'outfile'})
86 3 0 if (lc $opt->{'outfile'} eq 'stdout') { }
95 0 15 if substr($line, 0, 1) eq '#'
99 0 15 unless App::RL::Common::info_is_valid($info)
101 0 15 if $opt->{'remove'}
105 5 10 if ($opt->{'op'} eq 'overlap')
106 5 0 if ($chrs->has($info->{'chr'}))
108 2 3 if ($chr_single->intersect($cur_positions)->is_not_empty)
114 5 10 if ($opt->{'op'} eq 'non-overlap')
115 5 0 if ($chrs->has($info->{'chr'})) { }
117 3 2 if ($chr_single->intersect($cur_positions)->is_empty)
126 5 10 if ($opt->{'op'} eq 'superset')
127 5 0 if ($chrs->has($info->{'chr'}))
129 2 3 if ($chr_single->superset($cur_positions))