■ 1. 文字(列)入力後リターン押下させる場合 <STDIN> や read で STDIN から読み込む chomp($str = <STDIN>); ■ 2. キーをタイプした瞬間に読み込む Term::ReadKey モジュールを使う http://search.cpan.org/~jstowe/TermReadKey-2.21/ タイプしたキーの文字コード(10進/16進)を出力する ------------------------------- use Term::ReadKey; print "^C to quit\n"; ReadMode 3; while (1) { $char = ReadKey(); last if not defined $char; printf("%02d (0x%02X)", ord $char, ord $char); print "\n"; } -------------------------------