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キーを押して実行できます。また、過去に入力したコマンドにアップダウンキーを使用してアクセスすることもできます。

bannerAds