Windows 7で、perlのプログラムをいくつか立ち上げているのですが、時々チェックをして、落ちているプログラムを調べたいのですが、
my @process = qx/tasklist/;
で見ますと、全て、perl.exeとなり、どれがどれなのか全く分かりません。解決する方法はないものでしょうか？
No.2
2625
1149
一例
NAME、CommandLine以外に得られる項目についてはダンプしてください。
# use Data::Dumper; use Win32::Process::Info; my $pi = Win32::Process::Info->new( { assert_debug_priv => 1 } ); my @processinfo = $pi->GetProcInfo(); foreach my $process (@processinfo) { # print Dumper($process); print join( ':', $process->{'NAME'}, $process->{'CommandLine'} ) }
http://search.cpan.org/~wyant/Win32-Process-Info-1.020/lib/Win32/Process/Info.pm
No.1
135391198
それぞれログを出して、そのログがちゃんと更新されているのか確認したらいかがでしょうか？
確かに、この方法はありですね。思いつきませんでした。良いアイディアありがとうございます。
No.2
26251149
ここでベストアンサー
一例
NAME、CommandLine以外に得られる項目についてはダンプしてください。
# use Data::Dumper; use Win32::Process::Info; my $pi = Win32::Process::Info->new( { assert_debug_priv => 1 } ); my @processinfo = $pi->GetProcInfo(); foreach my $process (@processinfo) { # print Dumper($process); print join( ':', $process->{'NAME'}, $process->{'CommandLine'} ) }
http://search.cpan.org/~wyant/Win32-Process-Info-1.020/lib/Win32/Process/Info.pm
おー、こんな方法があったのですね。
とても助かりました！
2
1
1
1
74
47
おー、こんな方法があったのですね。
2013/03/13 20:10:36とても助かりました！