From owner-freebsd-current Sun May 19 15:56:53 2002 Delivered-To: freebsd-current@freebsd.org Received: from mailsrv.otenet.gr (mailsrv.otenet.gr [195.170.0.5]) by hub.freebsd.org (Postfix) with ESMTP id 374FC37B40D for ; Sun, 19 May 2002 15:56:47 -0700 (PDT) Received: from hades.hell.gr (patr364-a23.otenet.gr [195.167.109.55]) by mailsrv.otenet.gr (8.12.3/8.12.3) with ESMTP id g4JMudQJ021329; Mon, 20 May 2002 01:56:45 +0300 (EEST) Received: from hades.hell.gr (hades [127.0.0.1]) by hades.hell.gr (8.12.3/8.12.3) with ESMTP id g4JMudCr002224; Mon, 20 May 2002 01:56:39 +0300 (EEST) (envelope-from keramida@ceid.upatras.gr) Received: (from charon@localhost) by hades.hell.gr (8.12.3/8.12.3/Submit) id g4JMudSI002219; Mon, 20 May 2002 01:56:39 +0300 (EEST) (envelope-from keramida@ceid.upatras.gr) Date: Mon, 20 May 2002 01:56:38 +0300 From: Giorgos Keramidas To: "David O'Brien" , current@FreeBSD.ORG Subject: Re: mergemaster(8) broken -- uses Perl Message-ID: <20020519225638.GB1565@hades.hell.gr> References: <20020518115410.A33493@dragon.nuxi.com> <20020519022922.GA10039@hades.hell.gr> <20020519110540.C39336@dragon.nuxi.com> Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii Content-Disposition: inline In-Reply-To: <20020519110540.C39336@dragon.nuxi.com> User-Agent: Mutt/1.3.99i Sender: owner-freebsd-current@FreeBSD.ORG Precedence: bulk List-ID: List-Archive: (Web Archive) List-Help: (List Instructions) List-Subscribe: List-Unsubscribe: X-Loop: FreeBSD.ORG On 2002-05-19 11:05, David O'Brien wrote: > On Sun, May 19, 2002 at 05:29:22AM +0300, Giorgos Keramidas wrote: > > Part of the problems I had when I tried to replace perl in > > mergemaster.sh with something `native' was that the perl code uses > > stat(2) to obtain the permission bits of a directory/file and I can't > > think of a way to do this with tools in the base system without > > resorting to ugly awk scripts that parse and translate ls(1) output. > > What is so ugly about it? It is not that many lines, and it is very easy > to read and understand what you are doing. Make it an sh function. > There is most likely code like this in the Perl binary. If this is so > ugly lets gut it out of perl also. Alright. I'll probably use this or the sed stuff I posted as a followup to Alfred's mail. I haven't had much time to spend on FreeBSD today since I was trying to install NetBSD on a spare disk and start getting acquainted, but thanks for the positive feedback ;) -- Giorgos Keramidas - http://www.FreeBSD.org keramida@FreeBSD.org - The Power to Serve To Unsubscribe: send mail to majordomo@FreeBSD.org with "unsubscribe freebsd-current" in the body of the message