Regex tricks: Difference between revisions

Revision as of 09:38, 12 July 2023

Microsoft Word

Find unpunctuated text: ([A-z ]{1,}) Find unpunctuated text with curly brackets: ([A-z \{\}]{1,})

Paragraph wrap

Find “paragraph 9(i)(a),” and wrap with prov tag:

Find: Paragraph ([0-9\(\)][!.,; ]{1,})
Replace: Paragraph {{nycsaprov|\1}}

If your numbering schema has full stops in it try this:

Find: Clause ([0-9\(\).][!,; ]{1,})
Replace: Clause {{ietaprov|\1}}

Indenting wikified autonumbering

In a word doc, make all your numbering reveal every level (eg “13(c)(vii)(B)” with the ferocity of a US securities lawyer. you can do this in the “Define Multilevel Lists” dialogue.
Copy your whole doc into a text-only email. It will faithfully convert all those numbers to text. You will lose the indenting. We will put it back.
Switch on Use wildcards in the replace dialogue.

Find: ^13([0-9]{1,}\([a-z,A-Z,0-9]{1,}\)\([a-z,A-Z,0-9]{1,}\)\([a-z,A-Z,0-9]{1,}\))
Replace: ^13:::\1

Then

Find: ^13([0-9]{1,}\([a-z,A-Z,0-9]{1,}\)\([a-z,A-Z,0-9]{1,}\))
Replace: ^13::\1

Then

Find: ^13([0-9]{1,}\([a-z,A-Z,0-9]{1,}\))
Replace: ^13:\1

Sorted.

EVEN BETTER THAN THAT: In the define multilevel dialogue, add the necessary number of indenting colons into the actual word numbering

Macro Magic

Tagging everything coloured blue

search and destroy

double spaces
Fields (ctrl-shift-F9)
bookmarks - there's a cool macro for this:

Sub RemoveAllBookmarks()

    Dim objBookmark As bookmark

    For Each objBookmark In ActiveDocument.Bookmarks

        objBookmark.Delete

    Next

End Sub

. Clear out all blue dashes - replace them with xxx
. Clear out all blue apostrophes - replace them with yyy
. Clear ot all blue spaces - replace them with qqq (this won't do the ones either side of the blue phrase)

Find: ([A-Z][a-z]{1,}) ([A-Z][a-z]{1,}) (use wildcards, font colour: blue)
Replace: \1qqq/2

. Now your tags are all continuous blue strings. So brace them:

Find: <(?{1,})> (use wildcards, font colour: blue)
Replace: {{wikitag|\1}} (font colour blue)

Now restore spaces, apostrophes and dashes.

Mwah.

Mediawiki

Newmanualising

Find: /\{\{manual\|MI\|2002\|([^]]*)\|Section\|[^]]*\|comp\}\}/ 
Replace: {{isdamanual|$1}}

Search destroy

Convert a fullanat2 into an ISDA anat:

Find /\{\{fullanat2\|isda\|([^]]*)\|2002\|[^]]*\|1992\}\}/ 
Replace{{isdaanat|$1}}

Delete a redundant Equity Derivative Nuts:

Find: /\{\{eqderivanat\|([0-9]*.[0-9]*\([a-z]*\))}}/ 
/\{\{nuts\|Equity Derivatives\|[0-9]*.[0-9]*\([a-z]*\)\}\}/  
Replace: {{eqderivanat|$1}}

@@ Line 17: / Line 17: @@
 *Copy your whole doc into a text-only email. It will faithfully convert all those numbers to text. You will lose the indenting. We will put it back.
 *Switch on Use wildcards in the replace dialogue.
-:*Find: ^13([0-9]{1,}\([a-z,A-Z,0-9]{1,}\)\([a-z,A-Z,0-9]{1,}\)\([a-z,A-Z,0-9]{1,}\))
+ Find: ^13([0-9]{1,}\([a-z,A-Z,0-9]{1,}\)\([a-z,A-Z,0-9]{1,}\)\([a-z,A-Z,0-9]{1,}\))
-:*Replace: ^13:::\1
+ Replace: ^13:::\1
 Then
-:*Find: ^13([0-9]{1,}\([a-z,A-Z,0-9]{1,}\)\([a-z,A-Z,0-9]{1,}\))
+ Find: ^13([0-9]{1,}\([a-z,A-Z,0-9]{1,}\)\([a-z,A-Z,0-9]{1,}\))
-:*Replace: ^13::\1
+ Replace: ^13::\1
 Then
-:*Find: ^13([0-9]{1,}\([a-z,A-Z,0-9]{1,}\))
+ Find: ^13([0-9]{1,}\([a-z,A-Z,0-9]{1,}\))
-:*Replace: ^13:\1
+ Replace: ^13:\1
 Sorted.
@@ Line 72: / Line 72: @@
   Replace<nowiki>{{isdaanat|$1}}</nowiki>
 Delete a redundant  Equity Derivative Nuts:
   Find: /\{\{eqderivanat\|([0-9]*.[0-9]*\([a-z]*\))}}/
-/\{\{nuts\|Equity Derivatives\|[0-9]*.[0-9]*\([a-z]*\)\}\}/
+ /\{\{nuts\|Equity Derivatives\|[0-9]*.[0-9]*\([a-z]*\)\}\}/
   Replace: <nowiki>{{eqderivanat|$1}}</nowiki>