From owner-FreeBSD-users-jp@jp.FreeBSD.org Fri Jun 13 09:15:31 2003
Received: (from daemon@localhost)
	by castle.jp.FreeBSD.org (8.11.6p2+3.4W/8.11.3) id h5D0FVG09293;
	Fri, 13 Jun 2003 09:15:31 +0900 (JST)
	(envelope-from owner-FreeBSD-users-jp@jp.FreeBSD.org)
Received: from qef.h.kobe-u.ac.jp (postfix@qef.h.kobe-u.ac.jp [133.30.224.62])
	by castle.jp.FreeBSD.org (8.11.6p2+3.4W/8.11.3) with ESMTP/inet id h5D0FUY09142
	for <FreeBSD-users-jp@jp.FreeBSD.org>; Fri, 13 Jun 2003 09:15:30 +0900 (JST)
	(envelope-from tatsumi@qef.h.kobe-u.ac.jp)
Received: by qef.h.kobe-u.ac.jp (Postfix, from userid 10)
	id 2D5FE254C7; Fri, 13 Jun 2003 09:15:29 +0900 (JST)
Received: from localhost (localhost [127.0.0.1])
	by pallas.h.kobe-u.ac.jp (Postfix) with ESMTP id 93A541301E
	for <FreeBSD-users-jp@jp.FreeBSD.org>; Fri, 13 Jun 2003 09:15:20 +0900 (JST)
To: FreeBSD-users-jp@jp.FreeBSD.org
From: =?iso-2022-jp?B?GyRCQyQ4Sj5mSVcbKEI=?= <tatsumi@qef.h.kobe-u.ac.jp>
In-Reply-To: <200306122348.AA00747@IIIS_282.hiroshima.intec.co.jp>
References: <20030613081751Z.tatsumi@qef.h.kobe-u.ac.jp>
	<200306122348.AA00747@IIIS_282.hiroshima.intec.co.jp>
Mime-Version: 1.0
Content-Type: Text/Plain; charset=iso-2022-jp
Content-Transfer-Encoding: 7bit
Message-Id: <20030613091520Q.tatsumi@qef.h.kobe-u.ac.jp>
X-Dispatcher: imput version 20000228(IM140)
Lines: 62
Reply-To: FreeBSD-users-jp@jp.FreeBSD.org
Precedence: list
Date: Fri, 13 Jun 2003 09:15:20 +0900
X-Sequence: FreeBSD-users-jp 75012
Subject: [FreeBSD-users-jp 75012] Re: =?ISO-2022-JP?B?GyRCNi9OTxsoQg==?=
 =?ISO-2022-JP?B?GyRCJEolXiUvJW01IUc9JHI7fSRDJD9ETD8uJT0bKEI=?=
 =?ISO-2022-JP?B?GyRCJVUlSBsoQg==?=
Sender: owner-FreeBSD-users-jp@jp.FreeBSD.org
X-Originator: tatsumi@qef.h.kobe-u.ac.jp
X-Distribute: distribute version 2.1 (Alpha) patchlevel 24e+030602

$B?@8MBg3X$NC$8J$G$9!#(B

> From: SHINODA Masanori <shinoda@hiroshima.intec.co.jp>
> $B$d$O$j:G6a$O$[$H$s$I$J$/$J$C$?$H$O$$$(!"7HBS%a!<%k$N>l9g!"CY1d$NLdBj(B
> $B$,$"$k$b$N$G!&!&!&(B

DDI Pocket $B!"$[$H$s$ICY$l$^$;$s$h!#(B

$B$3$s$J46$8"-$G2C9)$7$F;H$C$F$$$^$9!#(B
$B$b$C$H$$$$$d$j$+$?$"$k$h$&$J5$$,$7$^$9$,!#(B

cat, touch, rm, nkf, awk, sed, formail $B$J$I$N(B PATH $B$OMW3NG'$G$9!#(B
$BK|0l$N%/%i%C%/BP:v$N$?$a!"$G$-$k$+$.$j@dBP(BPATH$B$K$7$F$/$@$5$$!#(B
$B!JKM$,;H$C$F$$$k%*%j%8%J%k$O$=$&$J$C$F$$$^$9!#!K(B

--------------------
#!/bin/sh

cat > /tmp/mail4pdx.$$$.orig

touch ~/Mail/mail-header ~/Mail/mail-body
rm ~/Mail/mail-header ~/Mail/mail-body

${HOME}/bin/nkf -m0 -e /tmp/mail4pdx.$$$.orig\
  | awk -f ix.mail-head

formail -X "From: " -X "To: " -X "Subject: " -X "Date: " < ~/Mail/mail-header

echo "X-Stanp: yourname@your.domain"

echo ""

${HOME}/bin/nkf -j ~/Mail/mail-body\
  | awk 'NF>0{print $0}'\
  | sed -e 's/\ \ /\ /g' \
  | head -c 100\
  | nkf -j

rm /tmp/mail4pdx.$$$.orig ~/Mail/mail-header ~/Mail/mail-body
--------------------
$B$3$l",$N(B X-Stanp $B$O!"(Bloop $BKI;_$N$?$a$N!V%9%?%s%W!W$G!"(B
X-Stanp $B$,$D$$$F$$$k%a!<%k$OE>Aw$7$J$$$h$&$K(B .procmailrc $B$r:n$j$^$9!#(B

$B!|(B $B>e$N(Bscript$B$G(Bawk$B$,;H$&(B ix.mail-head $B$,0J2<$NDL$j!#(B
--------------------
BEGIN { NREAD = 0 }

{

  if ( NREAD == 1 )
    print $0 >> "${HOME}/Mail/mail-body";

  else if ( NREAD == 0 && NF == 0 ){
    printf("\n") >> "${HOME}/Mail/mail-header";
    NREAD = 1;
  }

  else {
     printf("%s\n",$0) >> "${HOME}/Mail/mail-header";
  }  
}
--------------------
