作者: 閑舎
日時: 2002/5/03(12:37)
saw@... (Ｙさ) さん writes.

> ...ついでに質問しちゃいますが
> >  when /^--\^ +([\w.+-]+)/
> の ([\w.+-]+) が何を意味しているのかがわかりませんでした(;^^ゞ

\w は Perl/Ruby の拡張で、[a-zA-Z0-9_]です。あと単に . + - がファイル名
に使われているかもしれない。そういうわけで、awk で同じことを書くと、
私の場合、Cygwin 環境なので、

--^ yabyax
#! c:/cygwin/bin/gawk -f
/^--\^\ +([a-zA-Z0-9_.+-]+)/ { file=$2; st=1; next; } # st=1:   ソース開始
/^--\$$/ && st==1 { st=0; next; } # st=0:   ソース終了
{ if(st==1) { # st=1..: ソース途中
   print > file;
#    print file, $0;
} }
--$

ですね。実行は、

> yabyax mailfile

で取り出せています。

--
本田博通（閑舎）
Hiromichi Honda <raku@...>