#!/usr/bin/perl

$URL = $ENV{'QUERY_STRING'};
print "Content-type: text/html\n\n";
print "<html><head>\n";
print "<title>jump</title></head>\n";
print "<body>\n";
print "以下のURLに飛びますよろしいですか?\n<br>\n";
print "<a href=" . $URL . ">" . $URL . "</a>\n";
print "</body></html>\n";
exit;

これでいいんだろ?
jump.cgi?http://yahoo.co.jp
みたいなかんじで呼び出せばOKです。