chiark / gitweb /
Remove some obsolete scripts.
[bin.git] / get-with-referrer
diff --git a/get-with-referrer b/get-with-referrer
deleted file mode 100755 (executable)
index 09a9cfb..0000000
+++ /dev/null
@@ -1,14 +0,0 @@
-#! /usr/bin/perl -w
-use strict;
-use LWP::UserAgent;
-
-my $url = <>;
-my $referrer = <>;
-my $target = <>;
-
-my $ua = new LWP::UserAgent;
-
-my $req = new HTTP::Request(GET => $url);
-$req->header(Referer => $referrer);
-my $res = $ua->request($req, $target);
-