… | |
… | |
32 | () |
32 | () |
33 | } |
33 | } |
34 | |
34 | |
35 | # "find interesting things"-patterns |
35 | # "find interesting things"-patterns |
36 | my @mark_patterns = ( |
36 | my @mark_patterns = ( |
37 | qr{ ([[:word:]]+) }x, |
37 | # qr{ ([[:word:]]+) }x, |
38 | qr{ ([^[:space:]]+) }x, |
38 | qr{ ([^[:space:]]+) }x, |
39 | |
39 | |
40 | # common types of "parentheses" |
40 | # common types of "parentheses" |
41 | qr{ (?<![^[:space:]]) ` ([^‘’]+) ` (?![^[:space:]]) }x, |
41 | qr{ (?<![^[:space:]]) ` ([^‘’]+) ` (?![^[:space:]]) }x, |
42 | qr{ (?<![^[:space:]]) ‘ ([^‘’]+) ’ (?![^[:space:]]) }x, |
42 | qr{ (?<![^[:space:]]) ‘ ([^‘’]+) ’ (?![^[:space:]]) }x, |