[perl5.git] / lib / Net / t / require.t


print "1..9\n";
my $i = 1;
eval { require Net::Config; } || print "not "; print "ok ",$i++,"\n";
eval { require Net::Domain; } || print "not "; print "ok ",$i++,"\n";
eval { require Net::Cmd; }    || print "not "; print "ok ",$i++,"\n";
eval { require Net::Netrc; }  || print "not "; print "ok ",$i++,"\n";
eval { require Net::FTP; }    || print "not "; print "ok ",$i++,"\n";
eval { require Net::SMTP; }   || print "not "; print "ok ",$i++,"\n";
eval { require Net::NNTP; }   || print "not "; print "ok ",$i++,"\n";
eval { require Net::POP3; }   || print "not "; print "ok ",$i++,"\n";
eval { require Net::Time; }   || print "not "; print "ok ",$i++,"\n";
Commit	Line	Data
406c51ee	1
85657ebf	2	print "1..9\n";
406c51ee JH	3	my $i = 1;
	4	eval { require Net::Config; } \|\| print "not "; print "ok ",$i++,"\n";
	5	eval { require Net::Domain; } \|\| print "not "; print "ok ",$i++,"\n";
	6	eval { require Net::Cmd; } \|\| print "not "; print "ok ",$i++,"\n";
	7	eval { require Net::Netrc; } \|\| print "not "; print "ok ",$i++,"\n";
	8	eval { require Net::FTP; } \|\| print "not "; print "ok ",$i++,"\n";
	9	eval { require Net::SMTP; } \|\| print "not "; print "ok ",$i++,"\n";
	10	eval { require Net::NNTP; } \|\| print "not "; print "ok ",$i++,"\n";
406c51ee JH	11	eval { require Net::POP3; } \|\| print "not "; print "ok ",$i++,"\n";
	12	eval { require Net::Time; } \|\| print "not "; print "ok ",$i++,"\n";
	13
	14