今現在Perlの並列処理について勉強しているのですが、分からない点があるのでご教授願います。
重並列が可能となるプログラムを作りたいと思い、以下のプログラムを作成しました。countには並列数(例えば3並列にしたいならば3)が入っています。これで重並列ができたと思ったのですが、よくよく考えてみると、このプログラムだと一つ目の子プロセスが終わらなければ、二つ目、三つ目の子プロセスが始まらないということに気付きました。同時に複数のプロセスを実行させるにはどのようなプログラムにすればよいでしょうか。お願いします。
while($count--){
$pid = fork;
if(!defined $pid){die "fork failed";}
elsif(!$pid){
&process;#子プロセス
exit;
}
}
wait;
・・・・・・#親プロセス
A 回答 (4件)
- 最新から表示
- 回答順に表示
No.2
- 回答日時:
ん? ちょっと試してみたけど, 「一つ目の子プロセスが終わらなければ、二つ目、三つ目の子プロセスが始まらない」なんてことはないよ. ちゃんと (親を含めて) 4個のプロセスが動いてるのが ps で確認できた.
むしろ, どうして「一つ目の子プロセスが終わらなければ、二つ目、三つ目の子プロセスが始まらない」ということに「気づいた」んだろう.
この回答への補足
複数のプロセスが動くのは確認したのですが、実行結果を見てみると、1つ目の子プロセス→親プロセス→2つ目の子プロセス→親プロセス→3つ目の子プロセス→・・・という順に処理されていました。1つ目の子プロセスよりも2つ目の子プロセスの方が処理が速い場合、本当に複数並列が実現していたとしたら、1つ目の子プロセスが終わる前に2つ目の子プロセスが終わるはずです。その結果を受けてちゃんと複数並列ができていないと考えました。
補足日時:2012/01/31 08:58No.3
- 回答日時:
こちらでは
sub process {
my ($num) = @_;
print STDERR "subprocess $num start at " . time . "\n";
sleep 5*(5-$num);
print STDERR "subprocess $num end at " . time . "\n";
}
print STDERR "start\n";
my @pids;
for my $i (0..2) {
my $pid = fork;
if (! defined $pid) {
die "fork failed\n";
} elsif (! $pid) {
process($i);
exit;
} else {
push @pids, $pid;
}
}
for my $pid (@pids) {
waitpid($pid, 0);
}
print STDERR "finish\n";
で期待通りの結果 (後で fork したプロセスが先に終わる: もちろん sleep している時間もほぼ設定通り) を確認しています.
いくつも質問すること自体は構わないけど, 放置プレイをするのではなく責任をもって終わらせようとは思いませんか?
アドバイスありがとうございます。やはり自分のプログラムでは並列に動作していないようです。子プロセス内の動作のせいなのかもしれません。もう少し自分でも考えてみます。
複数している質問は、今作成しているプログラムのことについてなので、それが完成次第全て締め切る予定です。マナー違反でしたらごめんなさい。
No.4
- 回答日時:
#2 への補足にある
「1つ目の子プロセス→親プロセス→2つ目の子プロセス→親プロセス→3つ目の子プロセス→・・・という順に処理されていました」
と http://oshiete.goo.ne.jp/qa/7276831.html に書いてある
「これだとa1→a3→・・・→ak→親プロセス→a2→a4→・・・→a(k-1)→親プロセスとなってしまいます」
とは明らかに矛盾してるね. これは, 「子プロセスの処理内容によって順序が変わる」ということ?
あと「複数している質問は、今作成しているプログラムのことについてなので、それが完成次第全て締め切る予定です」としてるけど, 逆にいえば「完成しなければ放置しても当然」なの? 何らか反応しようとは毛頭思わない?
ちなみに OS や Perl のバージョンを秘密にすることに意味があるんですか?
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- その他(学校・勉強) この中で間違ってある説明はありますか?詳しい方に教えていただきたいです。 A. 1つのプログラムが複 2 2023/07/14 01:15
- Visual Basic(VBA) ファイル全てを .xlsm に変更したところ、プログラムが途中で落ちてしまっています 17 2022/12/07 12:03
- C言語・C++・C# C言語プログラム変更 2 2022/12/21 15:03
- 工学 コンデンサメインの降圧回路 6 2022/09/02 17:20
- Visual Basic(VBA) Sheet3から2つの条件でオートフィルターで抽出した個数をSheet2へ入力するマクロで、一つ目の 4 2023/01/12 23:40
- Visual Basic(VBA) 【再々投稿】VBAのプログラムで動作しなくて困っています 8 2022/10/14 09:06
- Visual Basic(VBA) 列と行の名前(重複あり)が交差するセルに、データを入力したい 2 2022/06/25 22:42
- Java javaでのプログラム(配列)について質問です. 2 2022/10/14 22:27
- C言語・C++・C# このプログラミングの問題を教えて欲しいです。 キーボードから整数kを入力し、kが配列aの中に何個存在 2 2022/12/19 22:50
- Excel(エクセル) 列の複数ある空白セルを飛ばして、セルに並べて表示したい 3 2023/02/12 16:49
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Active Directoryでグループに...
-
forkしてもバックグラウンドで...
-
LCD ディスプレイを Raspberry ...
-
ArduinoのジャイロモジュールMP...
-
Excel VBAでリンク切れをチェッ...
-
モジュールとクラスの違いって...
-
VBAでoutlook365が起動しません。
-
Excel VBAで、ユーザーフォー...
-
Wordで、分かち書きをするVBA ...
-
Excel VBA 定義されたプロージ...
-
Excelで時刻になったら知らせて...
-
powershellで関数名を変更する...
-
グラフのX,Y座標を取得したい
-
vba 標準モジュールインポート...
-
例外処理のフローチャートの記...
-
COBOLで、Shellを起動するには?
-
Perl+DBD::Oracleのエラーがわ...
-
VB.NETでの他アプリケーション...
-
VBAのモジュールについて教えて...
-
Apache2 静的・動的モジュール...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
ハマったので助けて~。Apache...
-
AIX6でファイルのタイムスタン...
-
Active Directoryでグループに...
-
実行中のcpan processを終了さ...
-
open MAILでの"|"
-
時間がかかり過ぎたプロセスを...
-
Perl はOSによって動作が違った...
-
ディスク容量について
-
MS-DOSでperl実行時にコマンド...
-
system から得た情報を変数に入...
-
LinuxにおいてのPerlのプログラ...
-
HELOコマンドが失敗する。
-
Excel VBAでリンク切れをチェッ...
-
Excel VBA 定義されたプロージ...
-
例外処理のフローチャートの記...
-
ArduinoのジャイロモジュールMP...
-
ユーザー定義関数に#NAME?が返...
-
「デバイスは PRN を初期化でき...
-
VBAで別モジュールへの変数の受...
-
Excel VBA 『Call』で呼び出す...
おすすめ情報