diff options
| author | Yigit Sever | 2024-12-16 09:53:08 +0100 |
|---|---|---|
| committer | Yigit Sever | 2024-12-16 09:53:08 +0100 |
| commit | 29f04d842592a16428839bca388129bfe5fa47d2 (patch) | |
| tree | b430d9edeebb27a86432f098b719ce1c7a155669 | |
| parent | 4b4caf57c19e4e09fb87fddaf13191ced5e12212 (diff) | |
| download | dotfiles-29f04d842592a16428839bca388129bfe5fa47d2.tar.gz dotfiles-29f04d842592a16428839bca388129bfe5fa47d2.tar.bz2 dotfiles-29f04d842592a16428839bca388129bfe5fa47d2.zip | |
sentences: add vs. rule
| -rwxr-xr-x | .local/bin/sentences | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/.local/bin/sentences b/.local/bin/sentences index 146fd2c..750072e 100755 --- a/.local/bin/sentences +++ b/.local/bin/sentences | |||
| @@ -3,7 +3,7 @@ | |||
| 3 | use strict; | 3 | use strict; |
| 4 | 4 | ||
| 5 | my $pont = qr{[.!?]+}; ## punctuation | 5 | my $pont = qr{[.!?]+}; ## punctuation |
| 6 | my $abrev = qr{\b(?:Pr|Dr|Mr|[A-Z]|i\.e|e\.g|et al|etc|p|Jan|Feb|Mar|Apr|May|Jun|Jul|Aug|Sep|Oct|Nov|Dec)\.}; ## abbreviations | 6 | my $abrev = qr{\b(?:Pr|Dr|Mr|[A-Z]|i\.e|e\.g|et al|etc|p|Jan|Feb|Mar|Apr|May|Jun|Jul|Aug|Sep|Oct|Nov|Dec|vs)\.}; ## abbreviations |
| 7 | my $header = qr{(=+ .*? =+)}; | 7 | my $header = qr{(=+ .*? =+)}; |
| 8 | 8 | ||
| 9 | $/ = ""; | 9 | $/ = ""; |