野ざらし言

5192 悩んだだけのことはあった

文太 2022/12/11(Sun) 17:23 [5191]へのコメント

　題　＋　「と思う」

　いちおうワークファイルに検索文字列を写して、置換を基本に同じ結果を
得られるよう、やってみました。
　頭を使うことも悩むこともありませんでしたが、\(, \) をカーソルを動かし
ながら探す、という最初の案に１票という結果になりました。

aaa\([0-9]\)\([0-9]\)

を

aaa\([0-9]\)
\([0-9]\)

としてしまえば、処理が楽というのは、まあ、正しかったとは思いましたが。


　以下は、骨の部分だけです。


----- testfile.txt -----

aaa\([0-9]\)\([0-9]\)\([0-9]\)\([0-9]\)zzz

------------------------


=== Macrotmp by B ===;　も、大変。字がいっぱい。
* M
50 ^^ "Macrotmp"

	; --- tag pair num check	; \(, \) 整合性チェック
#56 "\(" #m "\(" #m "AY"
m=r,
#56 "\)" #m "\)" #m "AY"
n=r,
(m==n)?? {&m("\( \) tag pair num, incorrect").}


	; --- cut each  ...\), for REGEX replacement below
#56 "\)" #m "\)\n" #m "AY"		; \(, \) ペアを１行に一個にする
					; 次のregex置換（文字列削除）のため
	; --- del ...\) tail
#56 "\x \\(.+$$" #m "\(" #m "AY"	; \(...\)の　...\)を削る（行末）
					; 途中文字列は、行末には来ていないはず。

	; --- renumber \1, \2, \3 by looping
i=1,					; \1, \2, \3 の番号振り
#F "\(" #m				;
:a					;
	#c (r)? >b			;
	#d #g &?("%d",i) i++,		;
>a					; ここまで


	; --- get the original & correct 1-line form
:b
#56 "\n" #m "" #m "AY"			; 複数行だったのを１行に戻す

&m("finished") .

*

関連記事一覧ツリー （▼ を押すとツリー全体を一括表示します）

▼ - 5188.真剣マクロ（tag_rplp.def） - 文太 22/12/10-12:03

5190.Re: 真剣マクロ（tag_rplp.def） - めざら 22/12/10-16:43
- 5191.Re^2: 真剣マクロ（tag_rplp.def.. - 文太 22/12/10-18:19
  - 5192.悩んだだけのことはあった - 文太 22/12/11-17:23
    - 5194.Re: 悩んだだけのことはあった - めざら 22/12/13-22:03
      - 5196.Re^2: 悩んだだけのことはあった - 文太 22/12/14-13:05
    - 5195.最左最長がいけない（バカ） - 文太 22/12/14-00:05
      - 5262.Re: 最左最長がいけない（バカ） - 文太 23/01/02-00:37
        
        5263.最短マッチング - 文太 23/01/03-23:32
        
        5264.+ と * (@VWX) - 文太 23/01/03-23:33
        
        5265.Re: + と * (@VWX) - めざら 23/01/07-08:09
        
        5266.マッチは頭から - 文太 23/01/08-10:29
        
        5267.応用問題 - 文太 23/01/08-16:58
        5268.VWX 限定の話でした - 文太 23/01/08-22:10
        
        5269.整理？ - 文太 23/01/09-23:07
        
        5270.Re: 整理？ - めざら 23/01/10-23:07
        
        5271.Re^2: 整理？ - 文太 23/01/11-00:16
        
        5272.自分で限界を作るなかれ…(いや.. - めざら 23/01/15-10:30
        
        5273.Re: 自分で限界を作るなかれ…(.. - 文太 23/01/15-21:14
        
        5275.Re^2: 自分で限界を作るなかれ….. - めざら 23/01/18-17:09
        
        5276.Re^3: 自分で限界を作るなかれ….. - 文太 23/01/19-01:19
        
        5277.Re^4: 自分で限界を作るなかれ….. - めざら 23/01/20-14:44
        
        5280.Re^5: 自分で限界を作るなかれ….. - 文太 23/01/21-16:09
        
        5283.Re^6: 自分で限界を作るなかれ….. - めざら 23/01/22-18:10
        
        5321.ふくよか２号（その後） - 文太 23/02/04-16:36
        
        5322.Re: ふくよか２号（その後） - めざら 23/02/05-07:40
        
        5274.『作法』（_ST_） - 文太 23/01/15-21:51
  - 5193.Re^3: 真剣マクロ（tag_rplp.def.. - めざら 22/12/13-21:23
    - 5197.Re^4: 真剣マクロ（tag_rplp.def.. - 文太 22/12/14-13:07
5199.クイズ！ - 文太 22/12/21-14:15
- 5200.Re: クイズ！ - めざら 22/12/21-20:31
  - 5201.Re^2: クイズ！ - konno 22/12/22-00:12
    - 5202.聖闘士星矢 - 文太 22/12/22-10:40
      - 5205.Re: 聖闘士星矢 - konno 22/12/22-21:21
        
        5207.Re^2: 聖闘士星矢 - 文太 22/12/22-22:40
        
        5208.戸締まり - めざら 22/12/23-07:45
        5210.Re^3: 聖闘士星矢 - konno 22/12/24-00:50
    - 5204.Re^3: クイズ！ - めざら 22/12/22-10:59
      - 5206.Re^4: クイズ！ - konno 22/12/22-21:36
        
        5209.麦 - めざら 22/12/23-08:00
        
        5211.Re: 麦 - konno 22/12/24-01:14
        
        5212.Re^2: 麦 - 文太 22/12/24-16:39
        
        5215.Re: 麦 - としき 22/12/24-23:30
        
        5219.Re^2: 麦 - めざら 22/12/26-20:49
        
        5229.Re^3: 麦 - としき 22/12/28-23:04
        
        5247.Re^4: 麦 - としき 22/12/31-01:20
  - 5203.その他の言語 - 文太 22/12/22-10:43
5213.やったぜ！　tr.exe - 文太 22/12/24-22:35

返信フォーム （この記事に返信する場合は下記フォームから投稿して下さい）

おなまえ　：
Ｅメール　：
タイトル　：
メッセージ： 通常モード(推奨)　整形モード(非推奨)　 preモード(空白再現)
※ プログラムコード等を含まない場合は，できるだけ通常モードをご利用ください。
> 　題　＋　「と思う」 > > 　いちおうワークファイルに検索文字列を写して、置換を基本に同じ結果を > 得られるよう、やってみました。 > 　頭を使うことも悩むこともありませんでしたが、$, $ をカーソルを動かし > ながら探す、という最初の案に１票という結果になりました。 > > aaa$[0-9]$$[0-9]$ > > を > > aaa$[0-9]$ > $[0-9]$ > > としてしまえば、処理が楽というのは、まあ、正しかったとは思いましたが。 > > > 　以下は、骨の部分だけです。 > > > ----- testfile.txt ----- > > aaa$[0-9]$$[0-9]$$[0-9]$$[0-9]$zzz > > ------------------------ > > > === Macrotmp by B ===;　も、大変。字がいっぱい。 > * M > 50 ^^ "Macrotmp" > > ; --- tag pair num check ; $, $ 整合性チェック > #56 "$" #m "\(" #m "AY" > m=r, > #56 "$" #m "\)" #m "AY" > n=r, > (m==n)?? {&m(" tag pair num, incorrect").} > > > ; --- cut each ...\), for REGEX replacement below > #56 "\)" #m "\)\n" #m "AY" ; $, $ ペアを１行に一個にする > ; 次のregex置換（文字列削除）のため > ; --- del ...\) tail > #56 "\x \$.+$$" #m "\(" #m "AY" ; \(...$の　...\)を削る（行末） > ; 途中文字列は、行末には来ていないはず。 > > ; --- renumber \1, \2, \3 by looping > i=1, ; \1, \2, \3 の番号振り > #F "\(" #m ; > :a ; > #c (r)? >b ; > #d #g &?("%d",i) i++, ; > >a ; ここまで > > > ; --- get the original & correct 1-line form > :b > #56 "\n" #m "" #m "AY" ; 複数行だったのを１行に戻す > > &m("finished") . > > *
参照先　：
暗証キー： (英数字で8文字以内) プレビューなし

- 以下のフォームから自分の投稿記事を修正・削除することができます -

記事閲覧

5192 悩んだだけのことはあった