2
A
答えて
2
あなたが<>
からundefを取得したときにあなたがeofに達したことは知っていますが、あなたのケースではchomp
はそれを誇張しています。次のように
EOFまで読むために通常のPerlのイディオムは次のとおりです。
while(<>) {
chomp;
# do whatever you want with the line in $_
# ...
}
2
私はあなたの質問ctrl-d
に推測UNIX上として、EOF
に等しいのですか?
while (<$fh>) {
# use $_ here
}
それとも、あなたはPerlが舞台裏で何を綴ることが明示さを主張する場合:
while (defined($_ = <$fh>)) {
# use $_ here
}
またはいくつかの他の変数を使用します。
while (defined(my $in = <$fh>)) {
# use $in here
}
0
を
$fh
でいくつかのファイルハンドル付き
あなたが尋ねた質問に誰もが多くを追加しているようです。入力が終了したか、どのようにすることを知っていますとき、どのようにあなたが知っていると同じように
print "EOF reached\n" if not defined $input;
関連する問題
- 1. Perl Regex(\ d * \。\ d {2})
- 2. \ D Perlの正規表現で、私は維持していますいくつかのコードで
- 3. テキストボックスでCtrl + Cをキャッチする
- 4. これはどのコードですか?/^(\ d {4} | \ d {6})$/
- 5. 私のサーバーのD:ドライブにphpmyadminをインストールできますか?
- 6. perl -dのxとpの違いは何ですか?
- 7. Perl -dとmodulinoの問題
- 8. IPythonとbpythonでCtrl + Dを同等ですか?標準のPythonのインタラクティブシェルで
- 9. 私のコードがCtrlキーの状態を検出できないのはなぜですか?
- 10. ctrl-cをキャッチしてユーザーに確認する方法はありますか?
- 11. はどのように私はのCtrl-、つまり、Ctrlキー+コンマ
- 12. Ctrl + Shift + dでregisterHotKeys関数を使用する方法
- 13. ctrl-dはwhile(getchar()!= EOF)ループを停止しませんでした
- 14. 私が誰かの古いコードをつもりですperlの
- 15. 私のPerl書き換えキュウリを見直すことはできますか?
- 16. 私のコードが言うときオートフォーマットコードCTRL + Shiftキー+ Lは、例えば、文字列
- 17. Perlモジュールの使用Log :: Syslog :: Fast - 例外をキャッチできません
- 18. Cmd + Ctrl + Option + dをマップしてMacVimのNERDTreeをトグルする方法は?
- 19. Visual StudioのCtrlキーK + DのVisual Studio 2010のSharePointプロジェクトに
- 20. eval() 'dコード行xx
- 21. 私はWindowsマシン上のコードをチェックアウトできますか?
- 22. 私はこのTSQLコードを説明できますか?
- 23. 私は製品を出荷する際にどのようなPerlコードを含めるべきですか?
- 24. どのようにしてPerlコードを隠すことができますか?
- 25. AVAudioEngine.startでのクラッシュは()私は(再)に以下のコードを持って/キャッチ
- 26. Mercurialは - HG私はDの前に来るすべてのチェンジセットのリストを取得できますか
- 27. @_はPerlのコードの始めに何を意味しますか?
- 28. VimのCTRL-TとCTRL-Oの違いは何ですか?
- 29. PerlスクリプトはエラーとコードでLinuxシェルからOracleに接続できません
- 30. どのように私はiTunesのイベントをキャッチしますか?
:あなたは
^D
を介して、押されたことを伝えることができ:のために簡単に、入れ
ユーザは最後に到達したファイル内のパイピングとは対照的にctrl-Dを送信しましたか? – Sysyphus