如果在每个cgi中满足特定条件，是否有一种方法可以自动提交到路由

Question

当用户访问cgi页面时，如果满足某些条件，我希望通过post请求将用户转发到某个路由。我尝试了下面的代码，但我得到的网站无法访问。查看我的日志，我什么也没有得到。

我正在通过perl从cgi脚本中获取数据。如果条件匹配，我希望提交到非cgi路由。

print qq@<form name='success' action='mysite.com/canyd/' method='post'>@,
qq@<input type='hidden' name='linkB' value='Add Assets' />@,
qq@</form>@,
qq@<script type='text/javascript'>@,
qq@    document.success.submit()@,
qq@</script>@;

当满足条件并且这部分cgi代码被触发时，我就会得到无法访问的站点。我不需要用户选择提交。是否有可能使用post模块的方法。

我所期望的是，代码将满足条件，然后通过javascript提交将我带到canyd路由。

Answer 1

在HTTP client library的帮助下，在CGI程序中代表用户发送POST请求。

use HTTP::Tiny qw();
my $response = HTTP::Tiny->new->post_form(
    'http://‌mysite.com/canyd/',
    { linkB => 'Add Assets' }
);