Branch Coverage

blib/lib/App/Greple/update.pm
Criterion Covered Total %
branch 0 48 0.0


line true false branch
172 0 0 if ($opt_U ne "")
175 0 0 if (defined $opt_backup)
176 0 0 $opt_backup ne '' ? :
182 0 0 unless $current_file = delete $arg{&FILELABEL}
183 0 0 if $remember_data
194 0 0 @_ ? :
195 0 0 $diverted == 0 ? :
196 0 0 unless open UPDATE_STDOUT, ">&", \*STDOUT
198 0 0 unless open STDOUT, ">", $buffer
202 0 0 $diverted == 1 ? :
204 0 0 unless open STDOUT, ">&", \*UPDATE_STDOUT
218 0 0 if ($fdpath and $remember_data)
221 0 0 unless $fh = "IO::File"->new_tmpfile
223 0 0 unless my $fd = $fh->fcntl(1, 0)
224 0 0 unless $fh->fcntl(2, $fd & '18446744073709551614')
230 0 0 unless @update_diffcmd
250 0 0 unless recover_stdout()
253 0 0 if ($_ eq $divert_buffer)
257 0 0 if (my $suffix = $opt_suffix)
265 0 0 if ($arg{'replace'}) { }
266 0 0 if ($newname ne '') { }
268 0 0 unless rename $filename, $newname
269 0 0 if -f $filename
280 0 0 unless open my $fh, ">", $create