From owner-ports-jp@jp.freebsd.org  Mon Jan 26 02:12:41 1998
Received: by jaz.jp.freebsd.org (8.8.8+3.0Wbeta7/8.7.3) id CAA00494
	Mon, 26 Jan 1998 02:12:41 +0900 (JST)
Received: by jaz.jp.freebsd.org (8.8.8+3.0Wbeta7/8.7.3) with ESMTP id CAA00485
	for <ports-jp@jp.freebsd.org>; Mon, 26 Jan 1998 02:12:39 +0900 (JST)
Received: from thalamus.my.domain (h066.p058.iij4u.or.jp [210.130.58.66])
	by mfi00.iij.ad.jp (8.8.8/MFI1.2) with ESMTP id CAA05464
	for <ports-jp@jp.freebsd.org>; Mon, 26 Jan 1998 02:12:38 +0900 (JST)
Message-Id: <199801251712.CAA05464@mfi00.iij.ad.jp>
Received: (from sada@localhost)
	by thalamus.my.domain (8.8.7/3.6Wbeta797120713) id CAA02566;
	Mon, 26 Jan 1998 02:11:39 +0900 (JST)
Date: Mon, 26 Jan 1998 02:11:39 +0900 (JST)
To: ports-jp@jp.freebsd.org
From: sada@e-mail.ne.jp (SADA Kenji)
X-Mailer: mnews [version 1.21] 1997-12/23(Tue)
Reply-To: ports-jp@jp.freebsd.org
Precedence: bulk
X-Distribute: distribute [version 2.1 (Alpha) patchlevel=24]
X-Sequence: ports-jp 2537
Subject: [ports-jp 2537] PLIST maker
Errors-To: owner-ports-jp@jp.freebsd.org
Sender: owner-ports-jp@jp.freebsd.org

$BL>8E20$N:4ED$G$9!#(B
PLIST $B$N:n@.%D!<%k$G$9!#$h$1$l$P;H$C$F$/$@$5$$!#(B

[sada@thalamus] % cat plist
#!/bin/sh
( cd /usr/local; tar cf - $1 ) \
| /usr/bin/tar tvf - \
| /usr/bin/perl -ane '$_=$F[7];
	if (m%/$%) {
		s%/$%%;
		print "$. \@dirrm $_\n";
	}
	else {
		print "$. $_\n";
	}' \
| sort -rn \
| /usr/bin/perl -ane 'shift @F; $_ = join(" ", @F); print "$_\n"'

[sada@thalamus]  % ./plist lib/ja-communicator
lib/ja-communicator/vreg
lib/ja-communicator/java/classes/scd10.jar
:
@dirrm lib/ja-communicator/nethelp
@dirrm lib/ja-communicator

--
SADA Kenji <sada@e-mail.ne.jp> / <http://hippo.ail-inc.co.jp>
