From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: From: "Lenya L. Khachaturov" X-Mailer: The Bat! (v1.51) UNREG / CD5BF9353B3B7091 Organization: Yarintercom-Service X-Priority: 3 (Normal) Message-ID: <19682063591.20010424204607@chemsell.yaroslavl.ru> To: Sergey Degtyaryov In-Reply-To: <19852.010424@globetravel.spb.ru> References: <20010424200516.B7026@ldv.office.alt-linux.org> <19852.010424@globetravel.spb.ru> MIME-Version: 1.0 Content-Type: text/plain; charset=koi8-r Content-Transfer-Encoding: 8bit Subject: [mdk-re] =?koi8-r?B?UmU6IFttZGstcmVdIFJlOiBbbWRrLXJlXSBSZTogW21kay1yZV0g68HLINXC?= =?koi8-r?B?ydTYIHBwcGQ/?= Sender: mandrake-russian-admin@altlinux.ru Errors-To: mandrake-russian-admin@altlinux.ru X-BeenThere: mandrake-russian@altlinux.ru X-Mailman-Version: 2.0 Precedence: bulk Reply-To: mandrake-russian@altlinux.ru X-Reply-To: "Lenya L. Khachaturov" List-Help: List-Post: List-Subscribe: , List-Id: Mandrake/RE discussion list List-Unsubscribe: , List-Archive: Date: Tue Apr 24 21:03:00 2001 X-Original-Date: Tue, 24 Apr 2001 20:46:07 +0400 Archived-At: List-Archive: List-Post: Hello Sergey, Tuesday, April 24, 2001, 8:27:43 PM, you wrote: SD> Доброго времени суток, Dmitry, SD> 24.04.2001 в 20:05 Вы сказали буквально следующее: Dmitry>> Убить процесс /usr/sbin/pppd можно, скажем, выполнив Dmitry>> "killall /usr/sbin/pppd". Однако делать это Вам, скорее всего, не нужно. Dmitry>> Сформулируйте задачу конкретнее, и ответ будет более точным. Dmitry>> Regards, Dmitry>> Dmitry SD> О пользе чтения man, как раз. Надо было читать к killall. SD> Но все равно, может кому-то лень набирать /usr/sbin =) SD> Будем считать - практиковался. SD> SINOPSYS : SD> killcom [-l] process SD> -l - не убивать\показать SD> *killcom SD> #!/usr/bin/perl SD> foreach (@ARGV) { SD> push (@keys, shift @ARGV), next if /-\w/; SD> } SD> $victim = shift @ARGV; SD> open (PS, "ps ax |"); SD> while () { SD> ($pid, $tty, $stat, $time, $command) = split (' '),last if /(\d+)\s+(\w+)\s+(\w+)\s+(.*?)\s+($victim)/; SD> } SD> close (PS); SD> #print getppid, $pid; SD> #exit; SD> print "No such process : $victim\n",exit if ((!$pid) || ($pid eq getppid)); SD> print "Found process : $pid $tty $stat $time $command\n";exit if ($keys[0] eq '-l'); SD> print "killing $command\n"; SD> print "Killed successfully\n" if (kill 9, $pid); :)))) Сенькс! А как оно работает? killcom pppd вообще ничего не делает, будучи запущенным без параметров шлепает все подряд, по очереди. -- Best regards, Lenya mailto:lenya@georges.home