[問題] 一直出現 500 internal server error

看板Perl作者 (在梅邊)時間15年前 (2009/10/13 17:00), 編輯推噓1(101)
留言2則, 1人參與, 最新討論串1/1
同一個程式 為什麼執行這個網頁(http://phobius.binf.ku.dk/index.html) 就成功 但是 執行這各網頁(http://psort.ims.u-tokyo.ac.jp/form2.html) 卻一直出現 500 internal server error?? 執行的query(keywords)都是: >:144448 MLRNNKTIIIKYFLNLINGAFLVLGLLFMGFGAWLLLDRNNFLTAFDENNHFIVPISQILIGMGSSTVLFCLLGYIGIHNEIRWLLIVYAVLITWTFAVQVVLSAFIITKKEEVQQLWHDKIDFVISEYGSKDKPEDITKWTILNALQKTLQCCGQHNYTDWIKNKNKENSGQVPCSCTKSTLRKWFCDEPLNATYLEGCENKISAWYNVNVLTLIGINFGLLTSEVFQVSLTVCFFKNIKNIIHAEM use LWP::UserAgent; use HTTP::Request; use HTTP::Response; my $ua = new LWP::UserAgent; $ua->agent("Mozilla/5.0"); my @urls_titles = (), @urls = (),; my $keywords = ""; print "Enter the keywords, please:\n"; chomp($keywords = <STDIN>); ###################使用POST方式抓search result的urls################# my $response = $ua->post('http://phobius.binf.ku.dk/cgi-bin/predict.pl', { stype => '0', protseq => $keywords, protfile => '', "format" => '3', }); if ($response->is_success) { $_ = $response->content; #print $_; } else{ print $response->error_as_HTML; } -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 140.116.245.199

10/13 17:30, , 1F
protseq 是不是要先encode?
10/13 17:30, 1F

10/13 17:33, , 2F
ㄜ...忽略
10/13 17:33, 2F
文章代碼(AID): #1Ar47B7X (Perl)
文章代碼(AID): #1Ar47B7X (Perl)