summaryrefslogtreecommitdiff
path: root/lib/Net
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2001-07-04 14:32:27 +0000
committerJarkko Hietaniemi <jhi@iki.fi>2001-07-04 14:32:27 +0000
commit2972131df48a1f119450e7e4c3f1eb94aa5a7df7 (patch)
tree719d8d26f0b39b670342ecb125a9f5c2d1f3b415 /lib/Net
parentfbe3d936b182fa637b8c6c3747dd099aa13c0433 (diff)
downloadperl-2972131df48a1f119450e7e4c3f1eb94aa5a7df7.tar.gz
Update the libnet tests as per #11138.
p4raw-id: //depot/perl@11140
Diffstat (limited to 'lib/Net')
-rw-r--r--lib/Net/t/ph.t31
-rw-r--r--lib/Net/t/require.t2
2 files changed, 0 insertions, 33 deletions
diff --git a/lib/Net/t/ph.t b/lib/Net/t/ph.t
deleted file mode 100644
index 41ddab6bfe..0000000000
--- a/lib/Net/t/ph.t
+++ /dev/null
@@ -1,31 +0,0 @@
-#!./perl -w
-
-use Net::Config;
-use Net::PH;
-
-unless(@{$NetConfig{ph_hosts}} && $NetConfig{test_hosts}) {
- print "1..0\n";
- exit 0;
-}
-
-print "1..5\n";
-
-my $i = 1;
-
-$ph = Net::PH->new(Debug => 0)
- or (print("not ok 1\n"), exit);
-
-print "ok 1\n";
-
-$ph->fields or print "not ";
-print "ok 2\n";
-
-$ph->siteinfo or print "not ";
-print "ok 3\n";
-
-$ph->id or print "not ";
-print "ok 4\n";
-
-$ph->quit or print "not ";
-print "ok 5\n";
-
diff --git a/lib/Net/t/require.t b/lib/Net/t/require.t
index f9eba4d418..aaa3adb7c4 100644
--- a/lib/Net/t/require.t
+++ b/lib/Net/t/require.t
@@ -8,8 +8,6 @@ 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::SNPP; } || print "not "; print "ok ",$i++,"\n";
-eval { require Net::PH; } || 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";