From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: From: Henri Bourbon To: mandrake-russian@altlinux.ru Message-ID: <20011030231804.A26965@hb.ant-on.net> References: <20011030194400.A476@monster> Mime-Version: 1.0 Content-Type: text/plain; charset=koi8-r Content-Disposition: inline Content-Transfer-Encoding: 8bit In-Reply-To: <20011030194400.A476@monster>; from panik_2001@rambler.ru on Tue, Oct 30, 2001 at 07:44:00PM +0300 Subject: [mdk-re] =?koi8-r?B?89XNzcnSz9fBzsnFINDP1M/LwSDeydPFzA==?= 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 List-Help: List-Post: List-Subscribe: , List-Id: Linux-Mandrake RE / ALT Linux discussion list List-Unsubscribe: , List-Archive: Date: Tue Oct 30 23:13:21 2001 X-Original-Date: Tue, 30 Oct 2001 23:18:04 +0300 Archived-At: List-Archive: List-Post: Tue, 30 Oct 2001 19:44 +0300, Pankratov Artem wrote: > Имеется следующая проблема: ряд чисел который выводит скрипт, > как получить сумму этих чисел? $ my_script | perl -lwne '/\d+/ and $sum += $&; print $sum if eof' Из каждой входной строки берется только 1 число, первое, либо вообще ничего не берется, если строка не содержит цифр. Если числа дробные, поменять \d+ на, скажем, \d+(\.\d+)? или более сложный регэксп для ``числа''. Мне кажется, есть и стандартная утилита для вычисления суммы ряда чисел из станд. ввода, но ее имя я забыл. -- HB