chiark / gitweb /
Remove historical relic.
authorColin Watson <cjwatson@chiark.greenend.org.uk>
Sun, 18 Aug 2002 02:15:02 +0000 (02:15 +0000)
committerColin Watson <cjwatson@chiark.greenend.org.uk>
Sun, 18 Aug 2002 02:15:02 +0000 (02:15 +0000)
hermes-unread [deleted file]

diff --git a/hermes-unread b/hermes-unread
deleted file mode 100755 (executable)
index d69cf0d..0000000
+++ /dev/null
@@ -1,18 +0,0 @@
-#! /usr/bin/perl -w
-use diagnostics;
-use strict;
-use Socket;
-
-my $sin = sockaddr_in 2345, inet_aton 'hermes.cam.ac.uk';
-for (@ARGV)
-{
-       socket HERMES, PF_INET, SOCK_STREAM, getprotobyname 'tcp' or
-               die "Couldn't create socket: $!";
-       connect HERMES, $sin or die "Couldn't connect: $!";
-       send HERMES, "$_\015\012", 0;
-       my $text;
-       recv HERMES, $text, 256, MSG_WAITALL;
-       print((split /\n/, $text, 2)[1]);
-       close HERMES;
-}
-