From owner-FreeBSD-users-jp@jp.FreeBSD.org Wed May  8 23:21:51 2013
Received: (from daemon@localhost)
	by castle.jp.FreeBSD.org (8.11.6p2+3.4W/8.11.3) id r48ELpH40160;
	Wed, 8 May 2013 23:21:51 +0900 (JST)
	(envelope-from owner-FreeBSD-users-jp@jp.FreeBSD.org)
Received: from mail1.asahi-net.or.jp (mail1.asahi-net.or.jp [202.224.39.197])
	by castle.jp.FreeBSD.org (8.11.6p2+3.4W/8.11.3) with ESMTP/inet id r48ELpv40155
	for <FreeBSD-users-jp@jp.FreeBSD.org>; Wed, 8 May 2013 23:21:51 +0900 (JST)
	(envelope-from CQG00620@nifty.ne.jp)
Received: from asahi-net.jp (i218012.dynamic.ppp.asahi-net.or.jp [61.125.218.12])
	by mail1.asahi-net.or.jp (Postfix) with ESMTP id 8A9231BF0C
	for <FreeBSD-users-jp@jp.FreeBSD.org>; Wed,  8 May 2013 23:21:51 +0900 (JST)
From: WATANABE Kazuhiro <CQG00620@nifty.ne.jp>
To: FreeBSD-users-jp@jp.FreeBSD.org
In-Reply-To: <20130508172615.6db4b16a.kh@mogami.com>
References: <20130507003009.7cb66e9f.ota@j.email.ne.jp>	<20130508093952.64d16586.kh@mogami.com>	<20130507222106.3058bf6cfd6c0d608cde6f5e@j.email.ne.jp>	<20130508172615.6db4b16a.kh@mogami.com>
User-Agent: Wanderlust/2.14.0 (Africa) SEMI/1.14.6 (Maruoka) FLIM/1.14.9
 (=?ISO-8859-4?Q?Goj=F2?=) APEL/10.8 Emacs/21.3 (i386--freebsd) MULE/5.0
 (SAKAKI)
MIME-Version: 1.0 (generated by SEMI 1.14.6 - "Maruoka")
Content-Type: text/plain; charset=ISO-2022-JP
Message-Id: <20130508142151.8A9231BF0C@mail1.asahi-net.or.jp>
Reply-To: FreeBSD-users-jp@jp.FreeBSD.org
Precedence: list
Date: Wed, 08 May 2013 23:21:51 +0900
X-Sequence: FreeBSD-users-jp 94207
Subject: [FreeBSD-users-jp 94207] Re: japanese/gawk
 =?ISO-2022-JP?B?GyRCJHJNeE1RJE5KfRsoQg==?= 
Sender: owner-FreeBSD-users-jp@jp.FreeBSD.org
X-Originator: CQG00620@nifty.ne.jp
X-Distribute: distribute version 2.1 (Alpha) patchlevel 24e+060209

$BEOJU0l42$G$9!#(B

At Wed, 8 May 2013 17:26:15 +0900,
Kouichi Hirabayashi wrote:
> > awk(1) $B$H$N;v$J$N$G!"$3$A$i$O(B one true awk $B$NJ}$@$H;W$$$^$9!#(B
> > lang/gawk $B$,(B GNU awk $B$G(B /usr/local/bin/gawk $B$K$J$j$^$9!#(B
> 
> gawk $B$G$b4A;z$r4^$`J8;zNs$G(B index() $B$,@5$7$$7k2L$K$J$j$^$;$s!#(B

$B$&$A$N4D6-(B (9.1-RELEASE, LC_CTYPE=ja_JP.eucJP) $B$@$H$3$&$J$j$^$9!#(B

* japanese/gawk

$ /usr/local/bin/gawk --version | head -n 1
GNU Awk 3.0.6 + multi-byte extension 1.15
$ /usr/local/bin/gawk 'BEGIN{print index("$BF|K\8l(B", "$BK\(B")}'
3
$ /usr/local/bin/gawk 'BEGIN{print jindex("$BF|K\8l(B", "$BK\(B")}'
3
$ /usr/local/bin/gawk --ctype=EUC 'BEGIN{print index("$BF|K\8l(B", "$BK\(B")}'
3
$ /usr/local/bin/gawk --ctype=EUC 'BEGIN{print jindex("$BF|K\8l(B", "$BK\(B")}'
2
$ 

ctype $B$r;XDj$7$?>e$G(B "j" $B$NIU$$$?4X?t$r;HMQ$9$k$H!"J8;zC10L$G%+%&%s%H$7$^$9!#(B

* $B%7%9%F%`I8=`$N(B awk (one true awk == nawk)

$ /usr/bin/awk --version
awk version 20110810 (FreeBSD)
$ /usr/bin/awk 'BEGIN{print index("$BF|K\8l(B", "$BK\(B")}'
3
$ 

$B%P%$%HC10L$G8+$F$$$k$h$&$G$9!#(B

* lang/gawk

$ cd /usr/ports/lang/gawk/work/gawk-4.0.2/
$ ./gawk --version | head -n 1
GNU Awk 4.0.2
$ ./gawk 'BEGIN{print index("$BF|K\8l(B", "$BK\(B")}'
2
$ (unset LC_CTYPE; ./gawk 'BEGIN{print index("$BF|K\8l(B", "$BK\(B")}')
3
$ 

$B%^%k%A%P%$%HBP1~$r$9$k$+$I$&$+$O(B locale $B$G8+$F$$$k$h$&$G$9!#(B
# make install $B$9$k$H(B ja-gawk $B$r>e=q$-$7$F$7$^$&$N$G!"(Bmake $B$@$1$7$F(B
# $B%3%s%Q%$%k%G%#%l%/%H%j$G%F%9%H$7$F$^$9(B)
---
WATANABE Kazuhiro (CQG00620@nifty.ne.jp)
