| line |
stmt |
bran |
cond |
sub |
pod |
time |
code |
|
1
|
|
|
|
|
|
|
package Date::Manip::Lang::english; |
|
2
|
|
|
|
|
|
|
# Copyright (c) 1995-2023 Sullivan Beck. All rights reserved. |
|
3
|
|
|
|
|
|
|
# This program is free software; you can redistribute it and/or modify it |
|
4
|
|
|
|
|
|
|
# under the same terms as Perl itself. |
|
5
|
|
|
|
|
|
|
|
|
6
|
|
|
|
|
|
|
######################################################################## |
|
7
|
|
|
|
|
|
|
######################################################################## |
|
8
|
|
|
|
|
|
|
|
|
9
|
|
|
|
|
|
|
require 5.010000; |
|
10
|
|
|
|
|
|
|
|
|
11
|
168
|
|
|
168
|
|
1326
|
use strict; |
|
|
168
|
|
|
|
|
382
|
|
|
|
168
|
|
|
|
|
5898
|
|
|
12
|
168
|
|
|
168
|
|
955
|
use warnings; |
|
|
168
|
|
|
|
|
355
|
|
|
|
168
|
|
|
|
|
5984
|
|
|
13
|
168
|
|
|
168
|
|
911
|
use utf8; |
|
|
168
|
|
|
|
|
369
|
|
|
|
168
|
|
|
|
|
1520
|
|
|
14
|
|
|
|
|
|
|
|
|
15
|
|
|
|
|
|
|
our($VERSION); |
|
16
|
|
|
|
|
|
|
$VERSION='6.91'; |
|
17
|
|
|
|
|
|
|
|
|
18
|
|
|
|
|
|
|
|
|
19
|
|
|
|
|
|
|
our($Language,@Encodings,$LangName,$YearAdded); |
|
20
|
|
|
|
|
|
|
@Encodings = qw(); |
|
21
|
|
|
|
|
|
|
$LangName = "English"; |
|
22
|
|
|
|
|
|
|
$YearAdded = 1995; |
|
23
|
|
|
|
|
|
|
|
|
24
|
|
|
|
|
|
|
$Language = { |
|
25
|
|
|
|
|
|
|
_special_rules => { }, |
|
26
|
|
|
|
|
|
|
ampm => [['AM', 'A.M.'], ['PM', 'P.M.']], |
|
27
|
|
|
|
|
|
|
at => ['at'], |
|
28
|
|
|
|
|
|
|
day_abb => [ |
|
29
|
|
|
|
|
|
|
['Mon', 'Mon.'], |
|
30
|
|
|
|
|
|
|
['Tue', 'Tues', 'Tue.', 'Tues.'], |
|
31
|
|
|
|
|
|
|
['Wed', 'Wed.'], |
|
32
|
|
|
|
|
|
|
['Thu', 'Thur', 'Thu.', 'Thur.'], |
|
33
|
|
|
|
|
|
|
['Fri', 'Fri.'], |
|
34
|
|
|
|
|
|
|
['Sat', 'Sat.'], |
|
35
|
|
|
|
|
|
|
['Sun', 'Sun.'], |
|
36
|
|
|
|
|
|
|
], |
|
37
|
|
|
|
|
|
|
day_char => [['M'], ['T'], ['W'], ['Th'], ['F'], ['Sa'], ['S']], |
|
38
|
|
|
|
|
|
|
day_name => [ |
|
39
|
|
|
|
|
|
|
['Monday'], |
|
40
|
|
|
|
|
|
|
['Tuesday'], |
|
41
|
|
|
|
|
|
|
['Wednesday'], |
|
42
|
|
|
|
|
|
|
['Thursday'], |
|
43
|
|
|
|
|
|
|
['Friday'], |
|
44
|
|
|
|
|
|
|
['Saturday'], |
|
45
|
|
|
|
|
|
|
['Sunday'], |
|
46
|
|
|
|
|
|
|
], |
|
47
|
|
|
|
|
|
|
each => ['each', 'every'], |
|
48
|
|
|
|
|
|
|
fields => [ |
|
49
|
|
|
|
|
|
|
['years', 'y', 'yr', 'year', 'yrs'], |
|
50
|
|
|
|
|
|
|
['months', 'm', 'mon', 'month', 'mons'], |
|
51
|
|
|
|
|
|
|
['weeks', 'w', 'wk', 'wks', 'week'], |
|
52
|
|
|
|
|
|
|
['days', 'd', 'day'], |
|
53
|
|
|
|
|
|
|
['hours', 'h', 'hr', 'hrs', 'hour'], |
|
54
|
|
|
|
|
|
|
['minutes', 'mn', 'min', 'minute', 'mins'], |
|
55
|
|
|
|
|
|
|
['seconds', 's', 'sec', 'second', 'secs'], |
|
56
|
|
|
|
|
|
|
], |
|
57
|
|
|
|
|
|
|
last => ['last', 'final'], |
|
58
|
|
|
|
|
|
|
mode => [['exactly', 'approximately'], ['business']], |
|
59
|
|
|
|
|
|
|
month_abb => [ |
|
60
|
|
|
|
|
|
|
['Jan', 'Jan.'], |
|
61
|
|
|
|
|
|
|
['Feb', 'Feb.'], |
|
62
|
|
|
|
|
|
|
['Mar', 'Mar.'], |
|
63
|
|
|
|
|
|
|
['Apr', 'Apr.'], |
|
64
|
|
|
|
|
|
|
['May', 'May.'], |
|
65
|
|
|
|
|
|
|
['Jun', 'Jun.'], |
|
66
|
|
|
|
|
|
|
['Jul', 'Jul.'], |
|
67
|
|
|
|
|
|
|
['Aug', 'Aug.'], |
|
68
|
|
|
|
|
|
|
['Sep', 'Sept', 'Sep.', 'Sept.'], |
|
69
|
|
|
|
|
|
|
['Oct', 'Oct.'], |
|
70
|
|
|
|
|
|
|
['Nov', 'Nov.'], |
|
71
|
|
|
|
|
|
|
['Dec', 'Dec.'], |
|
72
|
|
|
|
|
|
|
], |
|
73
|
|
|
|
|
|
|
month_name => [ |
|
74
|
|
|
|
|
|
|
['January'], |
|
75
|
|
|
|
|
|
|
['February'], |
|
76
|
|
|
|
|
|
|
['March'], |
|
77
|
|
|
|
|
|
|
['April'], |
|
78
|
|
|
|
|
|
|
['May'], |
|
79
|
|
|
|
|
|
|
['June'], |
|
80
|
|
|
|
|
|
|
['July'], |
|
81
|
|
|
|
|
|
|
['August'], |
|
82
|
|
|
|
|
|
|
['September'], |
|
83
|
|
|
|
|
|
|
['October'], |
|
84
|
|
|
|
|
|
|
['November'], |
|
85
|
|
|
|
|
|
|
['December'], |
|
86
|
|
|
|
|
|
|
], |
|
87
|
|
|
|
|
|
|
nextprev => [['next', 'following'], ['previous', 'last']], |
|
88
|
|
|
|
|
|
|
nth => [ |
|
89
|
|
|
|
|
|
|
['1st', 'first', 'one'], |
|
90
|
|
|
|
|
|
|
['2nd', 'second', 'two'], |
|
91
|
|
|
|
|
|
|
['3rd', 'third', 'three'], |
|
92
|
|
|
|
|
|
|
['4th', 'fourth', 'four'], |
|
93
|
|
|
|
|
|
|
['5th', 'fifth', 'five'], |
|
94
|
|
|
|
|
|
|
['6th', 'sixth', 'six'], |
|
95
|
|
|
|
|
|
|
['7th', 'seventh', 'seven'], |
|
96
|
|
|
|
|
|
|
['8th', 'eighth', 'eight'], |
|
97
|
|
|
|
|
|
|
['9th', 'ninth', 'nine'], |
|
98
|
|
|
|
|
|
|
['10th', 'tenth', 'ten'], |
|
99
|
|
|
|
|
|
|
['11th', 'eleventh', 'eleven'], |
|
100
|
|
|
|
|
|
|
['12th', 'twelfth', 'twelve'], |
|
101
|
|
|
|
|
|
|
['13th', 'thirteenth', 'thirteen'], |
|
102
|
|
|
|
|
|
|
['14th', 'fourteenth', 'fourteen'], |
|
103
|
|
|
|
|
|
|
['15th', 'fifteenth', 'fifteen'], |
|
104
|
|
|
|
|
|
|
['16th', 'sixteenth', 'sixteen'], |
|
105
|
|
|
|
|
|
|
['17th', 'seventeenth', 'seventeen'], |
|
106
|
|
|
|
|
|
|
['18th', 'eighteenth', 'eighteen'], |
|
107
|
|
|
|
|
|
|
['19th', 'nineteenth', 'nineteen'], |
|
108
|
|
|
|
|
|
|
['20th', 'twentieth', 'twenty'], |
|
109
|
|
|
|
|
|
|
['21st', 'twenty-first', 'twenty-one'], |
|
110
|
|
|
|
|
|
|
['22nd', 'twenty-second', 'twenty-two'], |
|
111
|
|
|
|
|
|
|
['23rd', 'twenty-third', 'twenty-three'], |
|
112
|
|
|
|
|
|
|
['24th', 'twenty-fourth', 'twenty-four'], |
|
113
|
|
|
|
|
|
|
['25th', 'twenty-fifth', 'twenty-five'], |
|
114
|
|
|
|
|
|
|
['26th', 'twenty-sixth', 'twenty-six'], |
|
115
|
|
|
|
|
|
|
['27th', 'twenty-seventh', 'twenty-seven'], |
|
116
|
|
|
|
|
|
|
['28th', 'twenty-eighth', 'twenty-eight'], |
|
117
|
|
|
|
|
|
|
['29th', 'twenty-ninth', 'twenty-nine'], |
|
118
|
|
|
|
|
|
|
['30th', 'thirtieth', 'thirty'], |
|
119
|
|
|
|
|
|
|
['31st', 'thirty-first', 'thirty-one'], |
|
120
|
|
|
|
|
|
|
['32nd', 'thirty-two', 'thirty-second'], |
|
121
|
|
|
|
|
|
|
['33rd', 'thirty-three', 'thirty-third'], |
|
122
|
|
|
|
|
|
|
['34th', 'thirty-four', 'thirty-fourth'], |
|
123
|
|
|
|
|
|
|
['35th', 'thirty-five', 'thirty-fifth'], |
|
124
|
|
|
|
|
|
|
['36th', 'thirty-six', 'thirty-sixth'], |
|
125
|
|
|
|
|
|
|
['37th', 'thirty-seven', 'thirty-seventh'], |
|
126
|
|
|
|
|
|
|
['38th', 'thirty-eight', 'thirty-eighth'], |
|
127
|
|
|
|
|
|
|
['39th', 'thirty-nine', 'thirty-ninth'], |
|
128
|
|
|
|
|
|
|
['40th', 'forty', 'fortieth'], |
|
129
|
|
|
|
|
|
|
['41st', 'forty-one', 'forty-first'], |
|
130
|
|
|
|
|
|
|
['42nd', 'forty-two', 'forty-second'], |
|
131
|
|
|
|
|
|
|
['43rd', 'forty-three', 'forty-third'], |
|
132
|
|
|
|
|
|
|
['44th', 'forty-four', 'forty-fourth'], |
|
133
|
|
|
|
|
|
|
['45th', 'forty-five', 'forty-fifth'], |
|
134
|
|
|
|
|
|
|
['46th', 'forty-six', 'forty-sixth'], |
|
135
|
|
|
|
|
|
|
['47th', 'forty-seven', 'forty-seventh'], |
|
136
|
|
|
|
|
|
|
['48th', 'forty-eight', 'forty-eighth'], |
|
137
|
|
|
|
|
|
|
['49th', 'forty-nine', 'forty-ninth'], |
|
138
|
|
|
|
|
|
|
['50th', 'fifty', 'fiftieth'], |
|
139
|
|
|
|
|
|
|
['51st', 'fifty-one', 'fifty-first'], |
|
140
|
|
|
|
|
|
|
['52nd', 'fifty-two', 'fifty-second'], |
|
141
|
|
|
|
|
|
|
['53rd', 'fifty-three', 'fifty-third'], |
|
142
|
|
|
|
|
|
|
], |
|
143
|
|
|
|
|
|
|
of => ['of', 'in'], |
|
144
|
|
|
|
|
|
|
offset_date => { |
|
145
|
|
|
|
|
|
|
ereyesterday => '-0:0:0:2:0:0:0', |
|
146
|
|
|
|
|
|
|
overmorrow => '+0:0:0:2:0:0:0', |
|
147
|
|
|
|
|
|
|
today => '0:0:0:0:0:0:0', |
|
148
|
|
|
|
|
|
|
tomorrow => '+0:0:0:1:0:0:0', |
|
149
|
|
|
|
|
|
|
yesterday => '-0:0:0:1:0:0:0', |
|
150
|
|
|
|
|
|
|
}, |
|
151
|
|
|
|
|
|
|
offset_time => { now => '0:0:0:0:0:0:0' }, |
|
152
|
|
|
|
|
|
|
on => ['on'], |
|
153
|
|
|
|
|
|
|
times => { midnight => '00:00:00', noon => '12:00:00' }, |
|
154
|
|
|
|
|
|
|
when => [ |
|
155
|
|
|
|
|
|
|
['ago', 'past', 'in the past', 'earlier', 'before now'], |
|
156
|
|
|
|
|
|
|
['in', 'later', 'future', 'in the future', 'from now'], |
|
157
|
|
|
|
|
|
|
], |
|
158
|
|
|
|
|
|
|
}; |
|
159
|
|
|
|
|
|
|
|
|
160
|
|
|
|
|
|
|
1; |