Branch Coverage

blib/lib/Net/SSH/AuthorizedKeysFile.pm
Criterion Covered Total %
branch 30 52 57.6


line true false branch
31 0 23 if exists $$self{'keys'}
35 0 23 if defined $keys
45 2 1 if defined $file
46 0 3 unless defined $$self{'file'}
52 0 3 unless (open $fh, "<$$self{'file'}")
60 2 2 if ($rc < $$self{'ridiculous_line_len'})
65 1 1 if (index($chunk, "\n") >= 0)
80 1 2 unless ($result)
109 0 0 if (defined $new_content)
130 12 43 unless ($pk)
137 43 0 if (not $$self{'strict'} or $pk->sanity_check)
143 0 0 if ($$self{'strict'})
167 3 60 if $line =~ /^$/
168 5 55 if $line =~ /^#/
172 43 12 if (defined $key) { }
175 2 10 if ($$self{'abort_on_error'})
192 0 22 if defined $file
193 0 22 unless defined $$self{'file'}
198 0 22 unless open FILE, "<$$self{'file'}"
228 4 0 unless (defined $file)
232 0 4 unless (open FILE, ">$file")
255 70 4 if (defined $text)
268 0 0 unless (defined $user)
271 0 0 unless (defined $user)
279 0 0 unless (defined $pwent[0])
296 0 0 unless defined $ssh_dir