t/require.t

   1 BEGIN { $| = 1; print "1..4\n"; }
   2
   3 my $i = 1;
   4 eval { require Date::Manip; } || print "not "; print "ok ",$i++,"\n";
   5 eval { require DBI; }         || print "not "; print "ok ",$i++,"\n";
   6 eval { require DBD::mysql; }  || print "not "; print "ok ",$i++,"\n";