Windows環(huán)境system函數(shù)使用的問題

hewangping

在windows下使用的一段Perl代碼，實現(xiàn)的功能是從腳本同一路徑的config文件中讀取要運行的命令。config文件格式為每條要運行的命令行單獨成行。不斷的讀取要運行的命令行，一條一條執(zhí)行，直到運行時間超過4個小時為止。命令行所用到的exe文件也在腳本的同一路徑下。但是腳本跑起來以后，發(fā)現(xiàn)一個問題。有時候腳本能正常的跑完4個小時。有時候system會返回錯誤: Can't spawn "ses_diag -dwnld -d_mcr abc_def_ghi_jkl.bin 400 1" No such file or directory...
可是所有的文件在這個過程中并沒有改變位置，為什么有時候成功有時候失敗呢

1. 
   
2. use strict;
   
3. use warnings;
   
4. 
   
5. use Time::HiRes qw (gettimeofday tv_interval);
   
6. 
   
7. my $t0 = 0;
   
8. my @commands_list = ();
   
9. 
   
10. open CONFIG, "config" or die "Can not open file: config $!\n";
    
11. while (<CONFIG>)
    
12. {
    
13.         chomp;
    
14.         push @commands_list, $_;
    
15. }
    
16. close CONFIG;
    
17. 
    
18. $t0 = [gettimeofday];
    
19. while (tv_interval($t0, [gettimeofday]) < 4*3600)
    
20. {
    
21.         foreach (@commands_list)
    
22.         {
    
23.                 if (system("$_"))
    
24.                 {
    
25.                         print "Run-in test paused\n";
    
26.                          die "Error when executing $_ $!\n";
    
27.                 }
    
28.         }
    
29. }
    
30. 
    
31. print "Run-in test for 4 hours completed successfully!\n";

復(fù)制代碼

不死草

這個可能是你的機子在run perl的同時你還在做其他的事情，有時候會造成沖突。
還有就是假如你是從別的機子或者網(wǎng)絡(luò)上讀文件的話也會產(chǎn)生這種情況，當(dāng)然是網(wǎng)絡(luò)不穩(wěn)定的原因咯！~

hewangping

謝謝樓主。
確實有另外一個程序在對別的磁盤做IO。但這是測試的目的之一。難道沒有解決辦法嗎

不死草

呵呵，你可以做一個log file,記錄程序運行中的錯誤返回信息和時間信息，然后對照2個程序，看是否有同時調(diào)用同一個文件的問題，這個反正就是沖突啦。。。我們一般在做一些schedual內(nèi)容的時候一般建議不要同時做其他事情。