2014-03-24 40 views
0

我試圖做到以下幾點:你的供應商沒有定義的Win32 ::過程宏觀getExitCode

my @procs; 
// .. do some stuff 
Win32::Process::Create($ProcessObj, "$COMSPEC", $cmd, 0, NORMAL_PRIORITY_CLASS, ".") 
push (@procs, $ProcessObj); 

// .. do some stuff 
my $exitcode = 0; 
foreach my $proc (@procs) 
{ 
    $proc->getExitCode($exitcode); 
    if ($exitcode > 0) { 
    print "\t*** ERROR IN BUILD ***\n"; 
    exit ($exitcode); 
    } 
}; 

然而,當這部分腳本得到執行,我得到以下信息:

您的供應商尚未定義Win32 :: Process宏getExitCode,在C:.. build.pl行182處使用,位於C:/ Program Files(x86)/IBM/RationalSDLC/common/lib/perl5/site_perl/5.8.6/MSWin32 -x86-multi-thread/Win32/Process.pm line 47,line 1700.

我試過在網上搜索,但找不到多少。我對Perl很新,所以這讓我很難過。 bless在這裏發揮作用嗎?

回答