> リストスレッド表示２ （タイトルが変わらない記事を省略して表示）です。

バグがありました。
Re^11: のようにコメントが二けたになると対応できていませんでした。
スクリプトは

  $sub1 =~ s/^Re.[0-9]: //;
  $sub1 =~ s/^Re: //;

となっていましたが、

  $sub1 =~ s/^Re.[0-9]+: //;
  $sub1 =~ s/^Re: //;

このように、+ 追加で二桁対応できました。
誰かこの2行を1行に纏めてくれないかなぁ。(^^;

あと、ツリーの記事数も出してみました。
見た目はアレですが、結構お気に入りです。

konnoさん

>正規表現先頭文字以外の場所での「＾」は、メタ文字でない。
　★これは間違いです。m(__)m

　す、すいません。メタ文字の打ち消しに関して、間違えました。
　[ ] の中に入ったら、「＾」＝否定が先頭でないならメタ文字の意味なし、が
正しかったです。ここでは関係なしです。
　行頭の意味の「＾」じゃないよ、という意味では、ちゃんとメタ文字打ち消し
のために「￥」をおいてエスケープしてやる必要がありました。すいません。
　たぶん、perl のヴァージョンに依らないです。

C:\>type t.txt |to			;対象テキストの内容
a^					;先頭じゃないベタな「＾」がある。

C:\>Jperl4 -pe "s/a\^/aa/" t.txt	;ver.4, メタ文字打ち消しの「￥」必要
aa

C:\>Onigsed -R -ne "s/a\^/aa/p" t.txt 	;ver.5, perl5-like regex。
aa

　失敗例は特に挙げませんでした。m(__)m

-----

　VWXでなく、Vzのメタ文字打ち消しもすごいです。つい先日の体験。

*.* --> \*.*

　この置換をするには、

検索文字列　置換文字列
\*.\*       \\\*.\*

　とするのが正解でした。
　そもそもなんで上の置換が必要になったかといういうと、メタ文字打ち消しを
忘れたから。入れたつもりの￥がなかったから。あは。
　正規表現の世界で「置換文字列」にメタ文字が存在するのは、「タグ付き置換」
の場合ぐらいなんですよ。

\x ^\([0-9]+\)章  -->  ★\1章	;もちろん「\1」が置換文字列の
				;特殊またはメタ文字。

　同じ失敗を繰り返しております。

　いずれにせよ、確かめもせずに、失礼しました。

> 　行頭の意味の「＾」じゃないよ、という意味では、ちゃんとメタ文字打ち消し
> のために「￥」をおいてエスケープしてやる必要がありました。すいません。

そうすると、「＾」が何処にあっても文字列の先頭の意味になるということですか。
ググってもその辺を具体的に説明しているページは見つけられませんでした。
また、説明に抜けか間違いがあると思われるページも結構あるような。

ところで、メタ文字の打消しからヒントを得て1行野郎が出来ました。＼(^^)／ ﾔｯﾀ-

    $sub1 =~ s/^Re\^?[0-9]*: //;

確認したのは下記のツリーです。2行の物と同じ表示になっていると思います。

▼ - No.5846 - 新しいNIFTY-Serve - konno - 12/06/27-23:38 
　 　 No.5862 - NIFTY-Serve Library - konno - 12/07/18-00:35 
　 　 No.5865 - Re^8: 新しいNIFTY-Serve - としき - 12/07/22-20:02 
　 　 No.5870 - 新しいNIFTYへの要望 - konno - 12/07/25-22:56 
　 　 No.5873 - Re^11: 新しいNIFTY-Serve - K.TAM - 12/07/31-23:05 
　 　 No.5902 - Re^3: Facebookはいらない - konno - 12/09/24-00:06 
　 　 No.5848 - Re: 新しいNIFTY-Serve - konno - 12/07/01-21:58 
　 　 No.6098 - 新しいNIFTY-Serveの新機能「ハンドル検索」 - konno - 12/11/29-01:26 
　 　 No.6169 - NIFTY-Serveが@nifty IDでも登録可能に - konno - 12/12/26-00:32 
35 

> 　いずれにせよ、確かめもせずに、失礼しました。

いえいえ、おかげさまで理解が少し深まった気がします。
付き合ってくださってありがとうございました。

konnoさん

　余計な付け足しです。最初にこれを考えていました。^ の代わりの .
　ええ、僕もメタ文字がどうなるのか正確に調べるのが面倒で「どうせ１文字だ、
"." でいいだろう。 えいっ」とやってしまうことがあります。メタキャラは処理
系で微妙に違うし、それをエスケープするやり方もけっこう微妙に違うし。

　掲示板用の perl スクリプトだと、正規表現のその箇所だけ調べるのは億劫な
んだろうなぁ、とか。

　で、そういうときに僕がよくやるのが [\.*?+^$]  なんて方法です。文字クラ
ス内ではメタキャラが意味を失う場合が多いからです。ほとんどそうなるでしょ
う、たぶん。
　ま、これもいい加減な話ですが。

　甘い。

@Character_class 

  ^...    negative class (lowest precedence operator)
  x-y     range from x to y
  [...]   set (character class in character class)
  ..&&..  intersection (low precedence at the next of ^)
    ex. [a-w&&[^c-g]z] ==> ([a-w] AND ([^c-g] OR z)) ==> [abh-w]
  * If you want to use '[', '-', ']' as a normal character
    in a character class, you should escape these characters by '\'.

　なるほど。そうだね、[,],- が真っ先にメタキャラになりますねぇ。
　Perl5の場合です。&&なんて、うげっ、ものですが。


　考えてみると、僕が正規表現にそれほど深く悩まないのは、こういうシステム
文字をあまり使わないからだ。プログラマ的な人にとっては、泣かせてくれるシ
ステムですね。とはいえ、何かの文字を特殊文字にしなければならず、その文字
自体もリテラルに残らざるを得ないのだから、しょうがないことなんだけど。

　VWX.DOCより。トリッキーな場所です。
　以下がちゃんとできているのかの、検証をする予定はありません。
　あんまり使わないところではあるでしょう。でも、そのような重箱の隅に
８０％ぐらいのエネルギーを、プログラマは取られてしまうものなのでしょうね。

　それと、全半、大文字小文字同一視みたいな、そもそもの正規表現ではユーザ
が楽できるようにサポートされてないところも、VWX は担当してるたんだよな、
というのがつまらない発見でした。そんなの正規表現の守備範囲でないもの。も
ちろん、その守備範囲外であっても、ユーザが苦労すれば、範囲内におさめられ
はするのですが。


>・abc$|xyx$ タイプの検索時に正しく検索できなかった。
　この例なんかは、「文尾にこない$」の例とは言えるんでしょうか　＞konnoさん
　応用すれば、正規表現文字列の先頭にこない「^」のたぐいかな？　＝リテラル
にはエスケープが必要。
　またオアだ、ぼそ。

　もちろん、wgrep由来のVWXですから、アンドは正規表現でなく、グレップの
オプションが担当してるべきものです。大小文字同一視も、ふつう、ignorecase
で、オプションかフラグでしょうねぇ。これらを僕はほとんど使ったことがない
けど、でも、ユーザの側に立った立派な仕様です。


 -- Ver 0.50  92/02/22 --
　　・\t、\s単独での正規表現が出来なかった。

 -- Ver 0.52  92/02/25 --
　　・\.で'.'の検索が出来なかった。

 -- Ver 0.54  92/04/04 --
    ・ＶZで特殊文字として定義されている\n、\l、\rが使われていると正規表現とみ
    　なさないようにした。

 -- Ver 0.55c 92/07/29 --
    ・^$の検索が不正であった。

 -- Ver 1.00a 93/01/24 --
　　・置換時に例えば \\a が \a と解釈されない不具合を修正

 -- Ver 1.00e 93/05/28 --
　　・^$がEOFにマッチしてしまい、置換時にハングアップするなどの異常動作してい
　　　たものを修正した。

 -- Ver 1.00f 93/06/25 --
　　・AND検索をサポート

 -- Ver 1.00g 93/07/05 --
　　・abc$|xyx$ タイプの検索時に正しく検索できなかった。

 -- Ver 1.00i 93/09/26 --
　　・正規表現 「.」 が全角の濁点・半濁点などにマッチしないことがあったものを
　　　改善

 -- Ver 1.00p 93/10/12 --
　　・\a,\0 などを拡張正規表現としてサポート
　　・^[で 行頭の[ が検索出来なかったものを修正

 -- Ver 1.02  93/10/23 --
　　・全角・半角同一視時だけの指定時にも、|,& を認識するオプションをv オプショ
　　　ンに追加（従来の v オプションを拡張した。）

 -- Ver 1.02b 93/10/30 --
　　・\0+ タイプの正規表現でハングアップしていたものを修正

 -- Ver 1.02c 93/11/02 --
　　・正規表現 | が正しく動作しないことがあったもの（ｳｺﾞｸﾄﾓｱｯﾀﾄｲｳﾚﾍﾞﾙ(^_^;)）
　　　を修正

 -- Ver 1.03b 93/11/12 --
　　・OR/AND 検索時に異常な振る舞いをすることがあったものを修正

 -- Ver 1.03c 93/11/14 --
　　・検索文字列先頭の | 及び & は文字として扱うようにした。

 -- Ver 1.04  93/11/23 --
　　・ＶZ で Rx-,Zh+ の時にもタグ付き正規表現等を解析してしまっていたものを修正

 -- Ver 1.05  93/11/30 --
　　・ＶZ で Rx-,Zh+ の時に、文字列先頭または最終の \n を認識するようにした。
　　　（\n\nxyz などには対応していません。この場合は自動的に全角半角同一視はし
　　　　ない検索となる）

なんとVWXでヒットしてしまった

　ので、一応調べました。ただ、メタキャラの意味を消すのにその位置を使うの
は、 [ ] な文字クラスの話なので（そもそもの僕の間違い）、^ にしろ $ にし
ろ、リテラルな意味で使いたいなら一般に￥でエスケープするのが行儀のよい姿
勢かと思います。
　が、VWX が文字列「a^b」に対して、検索文字列「\x a^b」でも「\x a\^b」で
も許しているので（後者推薦）、調べました。もちろん、「\^」が通らない処理
系はないはずなので、そっちで行くべきかと思いますけれど（注、ygrepの特殊な
場合の特殊な例外を除く）。

　けっこう通（とお）してしまってます。

C:\>type t.txt		;対象テキスト
a^b

C:\>grep -V
GNU grep version 2.0 + multi-byte extension 1.04

C:\>egrep -V
GNU grep version 2.0 + multi-byte extension 1.04

C:\>grep "a^b" t.txt		;grep, NG

C:\>grep "a\^b" t.txt
a^b

C:\>egrep "a^b" t.txt		;egrep, NG

C:\>egrep "a\^b" t.txt
a^b

C:\>cgrep "a^b" t.txt		;cgrep, NG

C:\>cgrep "a\^b" t.txt
a^b

C:\>ygrep "a^b" t.txt		;ygrep, both
a^b

C:\>ygrep "a\^b" t.txt
a^b

C:\>yagrep "a^b" t.txt		;yagrep, NG

C:\>yagrep "a\^b" t.txt
a^b

C:\>izgrep "a^b" t.txt		;izgrep, NG

C:\>izgrep "a\^b" t.txt
a^b

C:\>oldsed -n -e "/a^b/p" t.txt		;serow's old sed, both
a^b

C:\>oldsed -n -e "/a\^b/p" t.txt
a^b

C:\>jgawk -e "/a^b/{print}" t.txt	;jgawk, both
a^b

C:\>jgawk -e "/a\^b/{print}" t.txt
a^b

　前に調べたとおり、perlは４も５も許しません。

　僕は、保守的でルールは単純なほうがよいと考えるたちです。だから、できた
ら  VWX に、すべての正規表現ツールに、「正統的」であってほしい（希望して
も仕方ないのだけど）。だから、「NG」組を支持します（笑）。
　そういうの「通して」くれたら親切みたいだけど、方言がバラバラになり混乱
すると思う。 だから、「駄目だ、NG だ」と言ってくれたほうが、逆に本当は親
切なんじゃないのかなぁ、と考えます。

　上の僕の考え方やテストが間違ってないなら、現場は大混乱な模様。それが、
現実のようです。


　このような資料が出てきました。上の（注）とリンク。
-----
《ygrepについての覚え書き》
　★　「(」は、かなり特殊に扱われるので、注意。 [(] や [)] を使う必要がある。
「\(」では駄目、というとこがミソ。
　★　「{」「}」「:」も特殊文字。これらは、「\{」「\}」「\:」がとおり、
「[{]」「[}]」もいけるが、「[:]」は駄目なので、「\:」が唯一の可能性。

>　が、VWX が文字列「a^b」に対して、検索文字列「\x a^b」でも「\x a\^b」で
>も許しているので（後者推薦）

　これについて、一つ思いつきました。
　「\x a^b」のとき、実はVWXは仕事をしてないんです。それが正規表現文字列と
みなされないとき、VWXはVzの検索に制御を渡してしまうんです。「\x 」指定が
あってさえ。VWXの、それこそ「一致文字列長」のAPIを調べれば、これが分かる
はずです。3とは返してこないはず。調べないけど。

　しかし、やっぱり現場は混乱続きの模様です。

C:\>mawk "/a^b/{print}" t.txt

C:\>mawk "/a\^b/{print}" t.txt		;よろしい
a^b

C:\>ssed --version
super-sed version 3.62
based on GNU sed version 4.1

C:\>ssed -n -e "/a^b/p" t.txt		;うぎゃ。本場でこれだもん。ぐすん。
a^b

C:\>ssed -n -e "/a\^b/p" t.txt
a^b

　もう、泥沼モード（汗）。

　これで分かります。そのまま実行をどうぞ。色はつきませんが。

=== matchstr.def v0.01 === めざらさん、借りました。
* mad for vz!
36 ^^ ""
	#F "\x a^b" #m
	#c
        cx-, ax=$E908, bx='VW', &i($2F) ;マッチした文字列長の取得
	&m("%d",cx).
*

a^b
　0と出ます。
　繰り返しですが、VWXは、「\x 」と言われても、指定された文字列にメタキャラ
が入ってないと、Ｖｚのリテラルな検索をやらせるのです。

　考えてみれば、konnoさんは、こんなことに悩んではいなかったのですよね。
　失礼しました。

　もうほとんど怒涛モード。いえ、昨日の雪かきと今日の雪道通勤で疲れ切って
いるのです。お許しを。

　ニュアンスが微妙ですが（とりわけvwx.doc）、同じことを言ってるのでしょう。
　何度もうるさくて、ごめんなさい。

正規表現一般（grepの項より）
---------------------------
　^  　文字列の先頭にマッチします。 ^crypt   は crypt にマッチしますが、
encrypt にはマッチしません。処理系やモードによっては文字列中の改行の直後
(つまり行の始め) にもマッチします。

　\ 　\ は厳密には正規表現演算子ではありません。しかし、上述した正規表現
演算子を文字そのものとして扱いたいような場合に、 その前に \ を置くことに
よって演算子の働きを抑制することができます。たとえば、\[ は [ というキャ
ラクタそのものに対する指定であって、キャラクタクラスの始まりを示すもので
はありません。

www.kt.rim.or.jp/~kbk/regex/regex.html


VWX.DOC
-------
　^ 　パターンの先頭に存在するときのみ、行の先頭を意味する。

　\c 　メタキャラクタとしての意味を打ち消す場合に使用し、文字 c そのもの
を表わす。ただし、\t はタブ記号、\s は空白文字を意味する。


Bruce.さんによるおまけ
----------------------
よくある勘違い その2
　前述した通り、ブラケットに囲まれている中ではほとんどのメタキャラクタは
その特殊な意味を失います。したがって、[^(foo)]bar という正規表現もまた、
「foo ではない文字列に続いて bar という文字列が続くもの」ではありません。
「f でも o でも ( でも ) でもない文字に続いて bar という文字列が続いたも
の」です。[]  の内側では、文字列や (より小さな) 正規表現要素をまとめる
というカッコの特別な意味は失われてしまうということに注意してください。
　（原文で読んでみて下さい。笑えます。）

>　だとすると、【Ａ】
>s/^Re^[0-9]+: //;
>s/^Re: //;
      ^ココ
>　なので、合わせて、【Ｂ】
>s/^Re[^:][0-9 ]+:* *//;

　もうダメダメじゃないか！ 　Re のあとは「^」と「:」しか来ないんだな、と
考えているようです。 で、[^:] とかやってる。あのぉ、それ文字クラスの否定
になってしまっていて、「『:』以外ならなんでもいいよ」という意味になってし
まうんですが、、、。
　アマアマだぜ！　失礼しました。

　「^Re」（頭）と「: 」（尻尾）が共通するのは見えていたんですけど、それ故
に見えてないところがありすぎました。あうううう。
　せめて[:^]としろよなぁ。[\^:]も可のはず。

　konnoさんの結論が理屈の上で美しいですぅ〜。読みやすくはないかもしれない
けど、やっぱり。
　おわびに（？）、変なのを上げておきます。