我有一个有趣的问题。
我编写了一个 Perl 脚本，它调用了一些显示 HTML 的子例程。子例程还包含表单标签。
我目前有三个输入type="submit"按钮，我已经将它们全部设置为name="submitbtn". 我通过说来区分它们
if ($cgi->param('submitbtn') eq 'value')
我调用我的第一个子程序，显示 HTML，用户输入信息并按下Save（提交按钮）。
调用另一个子例程并显示 HTML。我允许用户按下Return（一个调用子程序并转到另一个 HTML 页面Continue的提交按钮）或（一个调用另一个子程序以将所有内容提交到数据库的提交按钮）。
当我按下任一提交按钮时，我猜我的 CGI 参数是“重置”。我似乎无法弄清楚如何传递我的原始参数。
我说
my $cgi = CGI->new;
my %form = $cgi->Vars;
我试过了
sub(%form);
和这种性质的东西，但没有骰子。我对 Perl 很陌生。谢谢您的帮助。