※ ChatGPTを利用し、要約された質問です（原文：ユーザ-のインプットに対する対応）
Perlプログラムでのユーザー対応に関する問題
このQ&Aのポイント
Perlプログラムでユーザーのテキストファイル入力に対応する方法について相談です。
現在、Perlプログラムを作成中で、テキストファイルの各単語の数を表示する機能を実装しています。
しかし、プログラム終了時にユーザーが継続するかどうかを選択する処理がうまく機能しません。
ユーザーにテキストファイル（英語で書かれているもの）の名前を入力してもらいPerlプログラムが、そのファイルの各単語の数を表示する
というプログラムを作っています。
プログラム自体はできました。
ここで、
プログラム終了時に、
Do you want to continue? (c or q):
と表示し、
ユーザーがcを入力したらまたプログラムを最初からスタート（c = continue)
ユーザーがqを入力したら、プログラムを終了（q = quit)
という処理を加えたいのです。
そこで次のようにプログラムを書いたらこのプロセスがうまくいきませんでした。(qを入力しても、プログラムがcontinueされます。）
↓
$continue = 'c';
while ($continue ne 'q')
{
テキストファイルを読み込むプログラム本体...
...
...
...
print "Do you want to continue? (c or q)";
$continue = <STDIN>;
...
...
}
どこに問題があるのでしょうか？
わかる方、アドバイスをいただけないでしょうか。
よろしくお願いします。
お礼
回答ありがとうございます。 おかげさまで解決しました。 簡単にできるんですね...（苦笑）