From owner-freebsd-stable Mon Dec 13 10:20:16 1999 Delivered-To: freebsd-stable@freebsd.org Received: from electricrain.com (electricrain.com [166.90.54.240]) by hub.freebsd.org (Postfix) with SMTP id A9A5D152A8 for ; Mon, 13 Dec 1999 10:20:13 -0800 (PST) (envelope-from daniel@electricrain.com) Received: (qmail 26072 invoked by uid 501); 13 Dec 1999 18:20:04 -0000 From: "Daniel Sully" Date: Mon, 13 Dec 1999 10:20:04 -0800 To: Warner Losh Cc: Peter Radcliffe , freebsd-stable@FreeBSD.ORG Subject: Re: pidentd Message-ID: <19991213102004.D25035@electricrain.com> References: <19991213124609.A1355@pir.net> <199912131016.CAA21812@mass.cdrom.com> <19991213124609.A1355@pir.net> <199912131805.LAA45050@harmony.village.org> Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Mailer: Mutt 1.0i In-Reply-To: <199912131805.LAA45050@harmony.village.org>; from imp@village.org on Mon, Dec 13, 1999 at 11:05:24AM -0700 Sender: owner-freebsd-stable@FreeBSD.ORG Precedence: bulk X-Loop: FreeBSD.ORG Once upon a time Warner Losh shaped the electrons to say... > In message <19991213124609.A1355@pir.net> Peter Radcliffe writes: > : cat stupid.identd.pl > > This is far too long. > > #!/usr/bin/perl > ($a, $b) = split(/[,\n\r ]+/,<>); > print "$a , $b : USERID : UNIX : Warm-Fuzzy\r\n"; That is also far too long. perl -ne 'printf "%s , %s : USERID : UNIX : Bob\r\n",(split /[,\n\r ]+/)' =) -D -- Change? We fear change. To Unsubscribe: send mail to majordomo@FreeBSD.org with "unsubscribe freebsd-stable" in the body of the message