Sorry, i answer to myself, but "a" solution is to recall "GetProcessInformation" in order to work... The problem is solved, but for my personal knowledge i am very interesting in understanding why ??? > > use Mac::Files; > use Mac::Memory; > use Mac::Processes; > use Mac::MoreFiles(%Application); > use Mac::AppleEvents; > .... > sub kill_all > { > > local($psn,$psi,$pi,$a,$desc,$event,$PSNFINDER,$PSNPERL,$PIFINDER,$sig); > $a = GetCurrentProcess; > @PPSN=(); > @PPI=(); > while (($psn, $psi) = each(%Process)) > { > push(@PPSN,$psn) ; > push(@PPI,$psi) ; > print $psn." ".$psi->{processName}." ".$psi."\n"; > } > $len = $#PPSN; > for ($i=0;$i<=$len;$i++) > { > $psn = $PPSN[$i]; > $psi = $PPI[$i]; $psi = GetProcessInformation($PSN) ..... Laurent BARDI Ingenieur Systemes & Reseaux Centre National de la Recherche Scientifique INSTITUT de PHARMACOLOGIE et de BIOLOGIE STRUCTURALE Tel : 05-61-17-54-39 http://www.ipbs.fr/ Fax : 05-61-17-59-94 lolo@ipbs.fr CNRS-IPBS 205 Route de Narbonne 31400 TOULOUSE FRANCE //////////////////////////////////////////////////// / There is worse than to have not succeded : / / Not to have tried ! / //////////////////////////////////////////////////// If it stinks, it's chemistry. If it moves, it's biology. If it does not work, It's computer science. Linux the choice of a GNU generation ***** Want to unsubscribe from this list? ***** Send mail with body "unsubscribe" to mac-perl-request@iis.ee.ethz.ch