免费注册 查看新帖 |

Chinaunix

  平台 论坛 博客 文库
最近访问板块 发新帖
查看: 1359 | 回复: 0
打印 上一主题 下一主题

求助-perl获取post请求后的网页 [复制链接]

论坛徽章:
0
跳转到指定楼层
1 [收藏(0)] [报告]
发表于 2017-09-13 23:28 |只看该作者 |倒序浏览
<form name="inputForm" method="POST" action="http://rdp.cme.msu.edu/seqmatch/SeqmatchControllerServlet/start" enctype="multipart/form-data">
    <input type="hidden" name="printParams" value="no">
    <input type="hidden" name="fromDB" value="no">
    <h3 class="row">Please enter your sequences:</h3>
    <div class="details">

        <b>Running Jobs:</b>&nbsp;0<br>
        <b>Pending Jobs:</b>&nbsp;0<br><br>

        <br>
        <p><a href="http://rdp.cme.msu.edu/seqmatch/seqmatch_help.jsp#inputFormat">Choose a file to upload</a>:
            <input name="sequence_file" type="file" size="40"></p>


        <br>
        <p>Cut and paste sequence(s) (in Fasta, GenBank, or EMBL format):
            <br>
            &nbsp;&nbsp;<textarea name="sequence" wrap="off" rows="10" cols="50"></textarea>
        </p>
上面是http://rdp.cme.msu.edu/seqmatch/seqmatch_intro.jsp这个网页的源代码主要信息,我通过post请求获取不了返回的网页,求大家帮忙!!!!
下面是我写的程序:
                use LWP::UserAgent;                                                 #从数据库中获取数据                       
                use warnings;
                my $browser=LWP::UserAgent->new;  #浏览网页连接
                my $SUSUI_URL="http://rdp.cme.msu.edu/seqmatch/SeqmatchControllerServlet/start";  
                my $seq_16s = "CGGCGGACGGGTGAGTAACACGTGGGCAACCTGCCTGTAAGACTGGGATAACTCC";
                my $response=$browser->post($SUSUI_URL,['sequence'=>$seq_16s],'Content_Type' => 'multipart/form-data' );                  #在目的页面发送post请求
                print $response->content;#啥都没有= =!,求帮助

NJ`{QJXLBPSM{Y)6`[$0MOO.png (16.89 KB, 下载次数: 47)

这是原始网页

这是原始网页

QQ图片20170913235008.png (42.1 KB, 下载次数: 42)

这是传入参数后的网页

这是传入参数后的网页
您需要登录后才可以回帖 登录 | 注册

本版积分规则 发表回复

  

北京盛拓优讯信息技术有限公司. 版权所有 京ICP备16024965号-6 北京市公安局海淀分局网监中心备案编号:11010802020122 niuxiaotong@pcpop.com 17352615567
未成年举报专区
中国互联网协会会员  联系我们:huangweiwei@itpub.net
感谢所有关心和支持过ChinaUnix的朋友们 转载本站内容请注明原作者名及出处

清除 Cookies - ChinaUnix - Archiver - WAP - TOP