diff options
author | Yigit Sever | 2024-10-01 17:36:44 +0200 |
---|---|---|
committer | Yigit Sever | 2024-10-01 17:36:44 +0200 |
commit | 861f891749d0dd4b8323187488b02a11573ffb0a (patch) | |
tree | 262d29f609640b8c1a798b4f6dd0b867dfc55439 /.local/bin/sentences | |
parent | a4a60c84f7a2e37e7cf001ce08ebf36b66511b31 (diff) | |
download | dotfiles-861f891749d0dd4b8323187488b02a11573ffb0a.tar.gz dotfiles-861f891749d0dd4b8323187488b02a11573ffb0a.tar.bz2 dotfiles-861f891749d0dd4b8323187488b02a11573ffb0a.zip |
sentences: month abbreviations
Diffstat (limited to '.local/bin/sentences')
-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 cd90380..146fd2c 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)\.}; ## 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)\.}; ## abbreviations |
7 | my $header = qr{(=+ .*? =+)}; | 7 | my $header = qr{(=+ .*? =+)}; |
8 | 8 | ||
9 | $/ = ""; | 9 | $/ = ""; |