From owner-ports-jp@jp.freebsd.org  Sun Jan 23 10:43:21 2000
Received: (from daemon@localhost)
	by castle.jp.freebsd.org (8.9.3+3.2W/8.7.3) id KAA15289;
	Sun, 23 Jan 2000 10:43:21 +0900 (JST)
	(envelope-from owner-ports-jp@jp.FreeBSD.org)
Received: from localhost.my.domain (a095.uwajima.shikoku.ne.jp [210.157.174.95])
	by castle.jp.freebsd.org (8.9.3+3.2W/8.7.3) with ESMTP id KAA15284
	for <ports-jp@jp.freebsd.org>; Sun, 23 Jan 2000 10:43:19 +0900 (JST)
	(envelope-from nin@shikoku.ne.jp)
Received: from shikoku.ne.jp (ninslib [127.0.0.1])
	by localhost.my.domain (8.9.3/8.9.3) with SMTP id KAA36990
	for <ports-jp@jp.freebsd.org>; Sun, 23 Jan 2000 10:42:10 +0900 (JST)
	(envelope-from nin@shikoku.ne.jp)
Date: Sun, 23 Jan 2000 10:34:18 +0900 (JST)
Message-Id: <20000123.103418.71080821.nin@smtp.shikoku.ne.jp>
To: ports-jp@jp.freebsd.org
From: Ninomiya Hideyuki <nin@shikoku.ne.jp>
In-Reply-To: <86ln5i7995.wl@daemon.local.idaemons.org>
References: <20000121.185821.08319972.nin@smtp.shikoku.ne.jp>
	<20000122.161120.74757078.nin@smtp.shikoku.ne.jp>
	<86ln5i7995.wl@daemon.local.idaemons.org>
X-Mailer: Mew version 1.95b18 on XEmacs 21.1 (Bryce Canyon)
X-cite-me: =?iso-2022-jp?B?GyRCJEskcxsoQg==?=
X-PGP-Fingerprint: 6C59 EC08 5B23 6490 44D0  7CD3 DA40 219F 7114 8553
X-PGP-Public-Key: http://user.shikoku.ne.jp/nin/pgp/public-key.txt
X-URL: http://user.shikoku.ne.jp/nin/index.html
Mime-Version: 1.0
Content-Type: Text/Plain; charset=iso-2022-jp
Content-Transfer-Encoding: 7bit
Reply-To: ports-jp@jp.freebsd.org
Precedence: list
X-Distribute: distribute version 2.1 (Alpha) patchlevel 24e+990727
X-Sequence: ports-jp 8656
Subject: [ports-jp 8656] Re: about ports
Errors-To: owner-ports-jp@jp.freebsd.org
Sender: owner-ports-jp@jp.freebsd.org
X-Originator: nin@shikoku.ne.jp

$B$*$O$h$&$4$6$$$^$9(B	$BFs5\(B @ $B$*;M9q(B $B$G$9!#(B

Akinori MUSHA aka knu <knu@idaemons.org> $B$O(B Sat, 22 Jan 2000 18:20:38 +0900 $B:"$K(B
    Subject:    [ports-jp 8641] Re: about ports
    Message-ID: <86ln5i7995.wl@daemon.local.idaemons.org>
        $B$K1w$$$F!"0J2<$N$h$&$K$*$C$7$c$C$F$$$^$7$?!#(B
$B"(ET9g$K$h$j<j$r2C$($5$;$FD:$/;v$,$"$j$^$9!#8fN;>52<$5$$%^%;%^%;(B....
knu> $B!!(Bknu$B$G$9!#(B
<snip>
knu> $B!!<+J,$G(B make index $B$9$l$P$h$$$@$1$G$O!)(Bcvs update$B$K$h$k99?7$J$i!"(B
knu> ${PORTSDIR}/INDEX$B$,>e=q$-$5$l$k?4G[$O$J$$$H;W$$$^$9$7!#(B

$B$*!A(B!!$B!"!V$=$N<j$,M-$C$?$o$$!W$H$d$C$F$_$?$1$I%@%a$G$7$?!#(B
$B:n$jD>$7$?(B INDEX $B$G$b(B "/usr/ports/....." $B$K$J$C$F$^$9!#(B

$BJQ$d$J!<$C$H;W$C$F!"(BTools/make_index $BFI$s$G$_$k$H!"(B

sub by_path {
    my $name = shift;
......
  # Make sure we have /usr/ports at the beginning.
    $name =~ s!^$pwd!/usr/ports!o;
......
}

# Save where we are so that we can map all directories formed
# from ${PORTSDIR} to their canonical location '/usr/ports/...'.
chomp($pwd = `pwd`);

# Read each line of output generated by the 'index' target.
while (<>) {
    chomp;
    my @f = split(/\|/);

  # Force to canonical form.
    $f[1] =~ s!^$pwd!/usr/ports!o;
    $f[4] =~ s!^$pwd!/usr/ports!o;

  # Save directory -> pkgname relationship.
  # Note: $f[0] gets clobbered by the splice below so we'll save
  # it to a new $name first.
    $by_path{$f[1]} = $name = $f[0];
.........

$B$F$J46$8$K=q$$$F$"$j$^$7$?!#!#!#!#(B
# perl $B$"$^$jFI$a$J$$$s$@$1$I(B....
path $B$O(B "/usr/ports/...." $B$K$J$k$h$&$KCV49$5$l$F$k$_$?$$!#(B
---
ICQ UIN:57442553                         $BFs5\(B $B=(9,(B@$B0&I2(B $B54KL(B $B9-8+D.(B
PGP-Fingerprint: 6C59 EC08 5B23 6490 44D0  7CD3 DA40 219F 7114 8553
PGP-Public-Key:  http://user.shikoku.ne.jp/nin/pgp/public-key.txt
mailto:nin@shikoku.ne.jp   http://user.shikoku.ne.jp/nin/index.html
