現在、私は 2 つの別個のスクリプトを持っています。1 つは HTML を出力してテキスト ボックスを生成し、送信ボタンは /~gen13/wordrate.cgi へのリンクを開きます。そのディレクトリ (クラス サーバー上) には、理論的には、ユーザーが入力したテキストを取得して値を返す 2 番目のスクリプトが含まれています。
私の問題は、2 番目のファイルで最初のファイルのテキスト ボックスへの入力にアクセスする方法がわからないことです。open コマンドと use コマンドを読みましたが、入力を参照する方法や、アクセス可能な入力がまったく作成されているかどうかはわかりません (テキスト ボックスがどこにも通じないのではないかと心配しています.. .)。
HTML スクリプトはここにあります。現在、2 番目のスクリプトを適切に呼び出す機能的な送信ボタンを含むボックスを作成していますが、2 番目のスクリプトには入力の実際の呼び出しがありません。
#!/usr/local/bin/perl
use CGI qw(:standard);
use strict;
use vars qw($
print header;
###Form Create###
&create_form;
sub create_form {
print ("<html><head><title>Wordy: Your One
Stop Verbosity Shop</title></head>\n<body>\n");
print ("WELCOME TO WORDY: YOUR ONE STOP VERBOSITY SHOP $vote<p>\n");
print <<endHTML;
<form action="/~gen13/wordrate.cgi" method="POST" target="_blank">
<textarea name="text" cols=120 rows=12>
Please enter your text...
</textarea>
<input type="submit" value="WORDIFY">
</form>
</body>
</html>
endHTML
}
exit;