Perl在提交multipart/form-data时的构造方法

因为要请求些数据，但是在构造POST请求时，发现平时的构造方法不起作用了。仔细查看了下代码，发现这个是multipart/form-data类型的。Google了一下，发现这个常来提交文件用。但是我所遇见的这个表单并不需要提交文件。翻了翻书，最后在CPAN上找到了解决的办法。

#!perl
#
#

use warnings;
use strict;
use LWP;
use HTTP::Request::Common;

my $url = "";

my $browser = LWP::UserAgent->new();

#这里用HTTP::Request::Common模块构建content内的内容；

my $request = POST(
                       $url,
                       Content_Type => 'form-data',
                       Content => [
                                     action =>'Search for all miRNAs predicted to target a Gene',
                                     clade => 'vertebrate',
                                     dataset => 'target predictions for all human microRNAs based on conservation in mammals (human, chimp, mouse, rat, dog)',
                                     name2 => 'hsa-let-7a',
                                     name1 => 'NM_014445'
                                  ]
                    );
#将构造好的内容通过LWP的request方法提交，获得返回的结果。

my $response = $browser->request($request);

print $response->content;


返回了正确结果。