綾小路龍之介の素人思考

[perl] 標準入力からデータを受け取ってこれを変数に格納する雛形

こういうよく使うものは雛形とか関数とかモジュールにしておきたい。

ポイントは入力レコードセパレータ変数(特殊変数) $/ に undefを代入して、一気に読み込むこと。このようなコードは"perlsub"の"Localization of special variables local, special variable"でも述べられている。

sub get_stdin
{
        my $str = '';
        {
                local $/ = undef;
                $str = <STDIN>;
        }
        return $str;
}

リファレンス

  1. CHALOW Search
  2. 標準入力 perl 特殊変数 セパレータ undef local - Google 検索
  3. perlsub - Perl のサブルーチン

ソーシャルブックマーク

  1. はてなブックマーク
  2. Google Bookmarks
  3. del.icio.us

ChangeLog

  1. Posted: 2009-08-09T15:11:19+09:00
  2. Modified: 2009-08-09T15:11:19+09:00
  3. Generated: 2017-07-19T23:09:20+09:00