Perl対話型環境の構築方法: 簡単ステップで解説
Perlで対話型環境を構築するには、Term::ReadLineモジュールを使用できます。以下は簡単なサンプルコードです:
use strict;
use Term::ReadLine;
my $term = Term::ReadLine->new('Interactive Perl');
while (defined(my $line = $term->readline('> '))) {
print "You typed: $line\n";
$term->addhistory($line);
}
この例では、まずTerm::ReadLineモジュールをインポートし、Term::ReadLineオブジェクトを作成します。無限ループ内でreadlineメソッドを使用してユーザーからの入力を受け取り、入力を印刷します。addhistoryメソッドを使用してユーザーの入力を履歴に追加し、前に入力したコマンドにアクセスするために上下キーを使用できるようにします。
このコードをファイルに保存して、ターミナルで実行することができます。インタラクティブなプロンプト(>)が表示され、ここでコマンドを入力してEnterキーを押して実行できます。また、過去に入力したコマンドにアップダウンキーを使用してアクセスすることもできます。