2011-06-09 16 views
14

は、私は次のコマンドを使用してバイナリを実行しようとしています:私はperlで上記を実装するにはどうすればよいperlスクリプトでキーを押すのを待つ方法は?

"Press ENTER to exit:" 

:「更新」コマンドを実行した後

system("update"); 

を、システムは次のプロンプトスクリプト?

+0

あなたはあまりにも似たプロンプトを実装するか、あなたはあまりにも迅速に対応あまりにもできるようにしたいんたいわけですか? – drnewman

答えて

21
use strict; 
use warnings; 

print "Press ENTER to exit:"; 
<STDIN>; 
+1

'$ |'を 'undef'や' 0'以外に設定しなければならないかもしれません。それ以外の場合は、出力がバッファリングされ、システムによっては、あなたが望むものとはまったく機能しない可能性があります。 –

+0

端末出力がバッファされません。何か不足していますか? – SuperDuperApps

1
#! usr/bin/perl 
print "How old are you?"; 
$age = <>; 
print "WOW! You are $age years old!"; 
関連する問題