Branch Coverage

blib/lib/Net/FTPServer/DBeg1/Server.pm
Criterion Covered Total %
branch 0 12 0.0


line true false branch
80 0 0 unless my $dbh = 'DBI'->connect('dbi:Pg(RaiseError=>1,AutoCommit=>0):dbname=ftp', '', '')
108 0 0 if $user_is_anon
115 0 0 unless my $row = $Net::FTPServer::DBeg1::Server::sth1->fetch
119 0 0 unless crypt($pass, $hashed_pass) eq $hashed_pass
156 0 0 unless my $row = $Net::FTPServer::DBeg1::Server::sth2->fetch
164 0 0 unless $row = $Net::FTPServer::DBeg1::Server::sth3->fetch