如何捕获实际的POST数据（实际数据包）？

Question

在Perl脚本中，我使用LWP :: UserAgent-＆gt; new来发布数据。有人可以告诉我如何在实际发布数据之前捕获实际的数据包吗？

这是我发布的方式：

my $response = $browser->post($authUrl,
     [ 'username' => $username, 
       'response' => $pwdChallenge
     ]);

由于