Date::Manip
DBI
-Set::Scalar
DBD::mysql (or whatever database system you use)
AuthenDBI (if you want to use Database based authentication)
CDK (for the telnet interface not nessecary if you plan to use the web based circulation module) also requires installation of the C CDK libraries http://www.vexus.ca/CDK.html ( CDKModuleHasProblems )
unless (eval require DBI) { push @missing,"DBI" };
unless (eval require Date::Manip) { push @missing,"Date::Manip" };
unless (eval require DBD::mysql) { push @missing,"DBD::mysql" };
-unless (eval require Set::Scalar) { push @missing,"Set::Scalar" };
#
# Print out a list of any missing modules
unless (eval {require DBI}) { push @missing,"DBI" };
unless (eval {require Date::Manip}) { push @missing,"Date::Manip" };
unless (eval {require DBD::mysql}) { push @missing,"DBD::mysql" };
-unless (eval {require Set::Scalar}) { push @missing,"Set::Scalar" };
unless (eval {require Net::Z3950}) {
print qq|
unless (eval {require DBI}) { push @missing,"DBI" };
unless (eval {require Date::Manip}) { push @missing,"Date::Manip" };
unless (eval {require DBD::mysql}) { push @missing,"DBD::mysql" };
-unless (eval {require Set::Scalar}) { push @missing,"Set::Scalar" };
unless (eval {require Net::Z3950}) {
print qq|
my $i = 1;
eval { require Date::Manip; } || print "not "; print "ok ",$i++,"\n";
eval { require DBI; } || print "not "; print "ok ",$i++,"\n";
-eval { require Set::Scalar; } || print "not "; print "ok ",$i++,"\n";
eval { require DBD::mysql; } || print "not "; print "ok ",$i++,"\n";