LWPを使用してhttp://xxxx.xxxx.jp/index.htmlにhttp://xxxx.xxxx.jp/submit.cgiからsubmitを行いたいが、405 Method Not Allowedのエラーが発生している。formの名前とsubmitの指定方法について教えてください。
LWPを使用してhttp://xxxx.xxxx.jp/index.htmlにhttp://xxxx.xxxx.jp/submit.cgiからsubmitを行いたいが、405 Method Not Allowedのエラーが発生しています。formの名前とsubmitの指定方法が分かりません。どうすればsubmitできますか?
LWPを使用してhttp://xxxx.xxxx.jp/index.htmlにhttp://xxxx.xxxx.jp/submit.cgiからsubmitさせたいが、405 Method Not Allowedのエラーが出てしまいます。formの名前とsubmitの指定方法がわかりません。教えていただけますか?
LWPでsubmitさせる方法
http://xxxx.xxxx.jp/index.htmlにhttp://xxxx.xxxx.jp/submit.cgiからアクセスして
subimitさせたいのですが、下記のcgiだとError: 405 Method Not Allowed と出てしまいます。
formの名前の指定とsubmitの指定方法が分かりません。何方か詳しい方ご教授お願いします。
**** http://xxxx.xxxx.jp/index.html *****
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<HTML>
<HEAD>
<META http-equiv="Content-Type" content="text/html; charset=SHIFT_JIS">
<META http-equiv="Content-Style-Type" content="text/css">
<SCRIPT language="JavaScript">
<!--
function test(){
var test = document.Myform.ttt.value;
alert(test);
}
//-->
</SCRIPT><TITLE></TITLE>
</HEAD>
<BODY>
<FORM name="Myform"><INPUT size="20" type="text" name="ttt"><INPUT type="button" value="送信" onclick="test()"></FORM>
</BODY>
</HTML>
**** http://xxxx.xxxx.jp/submit.cgi *****
#!/usr/bin/perl
use lib "lib";
use LWP::UserAgent;
use HTTP::Request::Common qw(POST);
my $url = 'http://xxxx.xxxx.jp/index.html';
my %formdata = ('ttt' => 'hellow');
my $req = POST($url, [%formdata]);
$req->header(
'Accept' => 'text/html',
'User_Agent' => 'Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; .NET CLR 1.1.4322) ',
'Referer' => 'http://ranks1.apserver.net/share/regist.php?u=pinkpanty2',
);
my $ua = LWP::UserAgent->new;
my $res = $ua->request( $req );
print "Content-type: text/html;\n\n";
if ($res->is_success) {
print $res->content;
} else {
print "Error: " . $res->status_line . "\n";
}
exit();
お礼
回答ありがとうございました