I need to check image*.tiff if exists (just any one match is ok) within the
following code. pls advise using glob or anything.
use Win32::Job;
my $job = Win32::Job->new;
$job->spawn($Config{perlpath}, "perl c:\\test\\a.pl");
$ok = $job->watch( sub {
return 1 if (-e "image*.tiff") || sleep (30);
}
, 1);
Yahoo!香港提供網上安全攻略,教你如何防範黑客! 請前往 http://hk.promo.yahoo.com/security/ 了解更多!_______________________________________________
ActivePerl mailing list
[email protected]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs