こんなCGI探してますスレッド Ver7
■ このスレッドは過去ログ倉庫に格納されています
すまぬ
#!/usr/local/bin/perl
# スクリプトのファイル名
$script = "jump.cgi";
if($ENV{PATH_INFO} =~ /(.+)$script\/(.+)/i){$url = $2;}
else{$url = $ENV{PATH_INFO}; $url =~ s/^\///;}
print qq{Content-type: text/html;\n\n};
print qq{<body>\n};
print qq{<a href="http://$url">http://$url</a><br>\n};
print qq{別のサイトにジャンプしようとしています。宜しければ上記のリンクをクリックしてください\n};
print qq{</body>\n};
exit;
■ このスレッドは過去ログ倉庫に格納されています