perl - open my $fh, "comand |"; # はモダンじゃない : 404 Blog Not Found

2009年02月10日01:00 カテゴリLightweight Languages perl - open my $fh, "comand |"; # はモダンじゃない モダンPerl入門 牧大輔 「モダンPerl入門」発売記念ということで、同書を補足するentryを。 同書でちょっと残念だったのが、[5.2 外部コマンドの実行]。あまりモダンではないのだ。 P. 141 system("/sbin/wget", "http://example.com"); これはいいのだが、以下がちょっとまずい。 my $output = `/bin/ls tmp`; open(my $fh, '| cat -v'); これ、何がまずいか、というと、コマンド実行の際に/bin/shを使ってしまうのだ。そのおかげでcommand < from > to 2&>1のようなリダイレクトも使えるなどの利点もあ

[sh2]

perldoc perlipcのSafe Pipe Opensセクション、「Since Perl 5.8.0…」から説明が書いてあって、exec()を直接呼ぶのでより安全。exec()の仕様上引数を配列で渡すことになるけれど、qw/command/の書き方なら見た目にも違和感なく書ける

[ortica]

[h:keyword:Perl 5.8][h:keyword:http://b.hatena.ne.jp/hotentry/20090210]

[nakimura]

外部コマンド実行の安全な方法

[BigFatCat]

へー。ただ、この書き方使うと可読性が悪くなりそうな気がする…

[deftrash]

書き込むときには'-|',読み込むときには'|-'を「ファイル名」として指定

[kamipo]

open my $fh, '|-', qw/cat -v/ or die $!;

[dealforest]

open(my $fh, '| cat -v'); -> open my $fh, '|-' or exec qw/cat -v/ or die $!;

[wkbyshnbtk]

typoの指摘がないね。commandをシステムに渡す今っぽい方法

[asiamoth]

やはり、Perl は記号の使い方を何個も覚えなければならないのか……。/ コメント欄がカオス。4 番目の指摘の指摘も的外れ。お前が（ry

[zetamatta]

パイプラインを使う時は「open my $fh, '|-', qw/cat -v/ or die $!;」がのぞましい

[hitsujibane]

モダンPerl

[sigwyg]

shellを経由しないのがモダン？ → 「書き込むときには'-|',読み込むときには'|-'」

[sankaseki]

404 Blog Not Found:perl - open my $fh, "comand |"; # はモダンじゃない

[rryu]

IO::Pipeを使えばもっとモダンに。

[shidho]

まさかこの書き方がperl6.0では通用しない、なんてことはないですよね。

[hassylin]

pipe

[iouri]

open my $fh, '|-' or exec qw/cat -v/ or die $!;　5.6ではこう書けばよかったのですね。

[lesamoureuses]

＞open my $fh, '|-', qw/cat -v/ or die $!;

[monjudoh]

http://www.amazon.co.jp/gp/product/4798119172 モダンPerl入門の補足

[lestrrat]

今北産業

[tsucchi1022]

外部コマンドの入出力を扱うときのお作法

[kits]

「書き込むときには'-|',読み込むときには'|-'」。cf. perlipc / 実際のところは「コマンド出力を読みこむときは'-|', 出力をコマンドへ渡す(書き込む)ときは'|-'」だと思う。

[kazuhooku]

「書き込むときには'-|',読み込むときには'|-'を「ファイル名」として指定し、あとは実行したいコマンドと引数をリストとして渡す。shellは全く経由しない」

[otsune]

String::ShellQuoteも忘れないであげて！

[charsbar]

Note that these operations are full Unix forks, which means they may not be correctly implemented on alien systems