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'
            );