post 请求参数

perl代码:

my $login_url='http://192.168.1.1/getpage.gch?pid=1001&logout=1';

my $res = $ua->post(

                $login_url,

                { 

                    'Username'  => 'useradmin',

                    'Password'  => 'pddgf',

                    'Frm_Logintoken'  => $Logintoken,



                    

                },

'User-Agent'=>'Mozilla/5.0 (Windows NT 6.1; WOW64; rv:45.0) Gecko/20100101 Firefox/45.0',

                'Host'=>'192.168.1.1',

                'Referer'=>'http://192.168.1.1/getpage.gch?pid=1001&logout=1'


            );