Branch Coverage

blib/lib/Net/FTPTurboSync/PrgOpts.pm
Criterion Covered Total %
branch 0 106 0.0


line true false branch
46 0 0 if ($$self{'configfile'} ne '')
47 0 0 if (-r $$self{'configfile'})
52 0 0 if ($_ eq '')
53 0 0 if ($_ =~ /[^=]+=[^=]+/ or $_ =~ /^-[a-zA-Z]+$/)
133 0 0 if ($fname eq 'cfg') { }
0 0 elsif ($fname eq 'ftpdir') { }
0 0 elsif ($fname =~ /ftppass(w(or)?d)?/i) { }
0 0 elsif ($fname eq 'ftpserver') { }
0 0 elsif ($fname eq 'ftpuser') { }
0 0 elsif ($fname eq 'maxerrors') { }
0 0 elsif ($fname eq 'localdir') { }
0 0 elsif ($fname eq 'timeout') { }
0 0 elsif ($fname eq 'ignoremask') { }
0 0 elsif ($fname eq 'db') { }
136 0 0 if ($$self{'ftpdir'} ne '/')
147 0 0 if ($fvalue =~ /^[0-9]{1,3}$/) { }
156 0 0 if ($fvalue > 0)
170 0 0 if ($$self{'remoteURL'} =~ m[^ftp://(([^\@/\\\:]+)(:([^\@/\\\:]+))?@)?([a-zA-Z01-9\.\-]+)/(.*)])
179 0 0 if (length $2 > 0)
180 0 0 if (length $4 > 0)
183 0 0 if ($$self{'ftpdir'} ne '/')
193 0 0 if ($curoptchar =~ /[cC]/) { }
0 0 elsif ($curoptchar =~ /[dD]/) { }
0 0 elsif ($curoptchar =~ /[fF]/) { }
0 0 elsif ($curoptchar =~ /[hH?]/) { }
0 0 elsif ($curoptchar =~ /[iI]/) { }
0 0 elsif ($curoptchar =~ /[lL]/) { }
0 0 elsif ($curoptchar =~ /[qQ]/) { }
0 0 elsif ($curoptchar =~ /[vV]/) { }
0 0 elsif ($curoptchar =~ /[nN]/) { }
0 0 elsif ($curoptchar =~ /[bB]/) { }
208 0 0 if ($$self{'localdir'} eq '') { }
221 0 0 if ($curopt =~ /^-[a-zA-Z]/) { }
0 0 elsif ($curopt =~ m[^ftp://(([^\@/\\\:]+)(:([^\@/\\\:]+))?@)?([a-zA-Z01-9\.\-]+)/(.*)]) { }
0 0 elsif ($curopt =~ /^[a-z]+=.+/) { }
234 0 0 if (0 == $$self{'noofopts'})
240 0 0 if ($curopt =~ /^cfg=/) { }
242 0 0 unless (-r $$self{'configfile'})
255 0 0 if ($$self{'ftpserver'} ne '' and $$self{'ftppasswd'} eq 'anonymous')
256 0 0 if ($$self{'ftpuser'} eq 'ftp') { }
258 0 0 if (defined $netrcdata)
264 0 0 if (defined $netrcdata)
272 0 0 if ($$self{'ftpuser'} eq '?')
273 0 0 if ($$self{'ftppasswd'} eq '?')
274 0 0 if ($$self{'ftpserver'} eq '')
275 0 0 if ($$self{'ftpdir'} eq '')
276 0 0 if ($$self{'ftpuser'} eq '')
277 0 0 if ($$self{'ftppasswd'} eq '')
285 0 0 if ($$self{'dbpath'} eq '')
288 0 0 if ($$self{'dodebug'})
289 0 0 if ($$self{'localdir'} eq '' or not -d $$self{'localdir'})
294 0 0 unless ($$self{'buildDB'})
298 0 0 if ($$self{'returncode'} > 0)