+++ /dev/null
-#! /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);
-