perl - 使用 Mojo::UserAgent 提交表单

Question

我想使用Mojo::UserAgent提交表单，其中表单具有以下内容：

<form action="/login" method="post" class="Login">

其中有 2 个输入 id 用户和密码

随着 WWW::Mechanize 我正在使用这样的东西：

my $resp = $agent->submit_form(
    form_number => 4,
    fields => {
    user => $user,
    password => $passwd,
    }
);

在 Mojo::UserAgent 上，我看到有一个提交发布请求的选项，例如：

my $tx = $ua->post(
    'https://metacpan.org/search' 
        => form => {q => 'mojo'}
);

如何使用 Mojo::UserAgent 提交这样的表单？