| Filename | /2home/ss5/perl5/perlbrew/perls/perl-5.12.3/lib/site_perl/5.12.3/DateTime/Locale/root.pm |
| Statements | Executed 141 statements in 1.57ms |
| Calls | P | F | Exclusive Time |
Inclusive Time |
Subroutine |
|---|---|---|---|---|---|
| 1 | 1 | 1 | 13µs | 15µs | DateTime::Locale::root::BEGIN@21 |
| 1 | 1 | 1 | 7µs | 14µs | DateTime::Locale::root::BEGIN@22 |
| 1 | 1 | 1 | 7µs | 69µs | DateTime::Locale::root::BEGIN@25 |
| 1 | 1 | 1 | 6µs | 7µs | DateTime::Locale::root::BEGIN@23 |
| 1 | 1 | 1 | 1µs | 1µs | DateTime::Locale::root::_default_date_format_length |
| 1 | 1 | 1 | 1µs | 1µs | DateTime::Locale::root::_default_time_format_length |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::_available_formats |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::_format_for_EEEd |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::_format_for_Hm |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::_format_for_Hms |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::_format_for_M |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::_format_for_MEd |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::_format_for_MMM |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::_format_for_MMMEd |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::_format_for_MMMMEd |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::_format_for_MMMMd |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::_format_for_MMMd |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::_format_for_Md |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::_format_for_d |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::_format_for_hm |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::_format_for_hms |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::_format_for_ms |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::_format_for_y |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::_format_for_yM |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::_format_for_yMEd |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::_format_for_yMMM |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::_format_for_yMMMEd |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::_format_for_yMMMM |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::_format_for_yQ |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::_format_for_yQQQ |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::am_pm_abbreviated |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::cldr_version |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::date_format_full |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::date_format_long |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::date_format_medium |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::date_format_short |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::datetime_format |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::day_format_abbreviated |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::day_format_narrow |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::day_format_wide |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::day_stand_alone_abbreviated |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::day_stand_alone_narrow |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::day_stand_alone_wide |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::era_abbreviated |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::era_narrow |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::era_wide |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::first_day_of_week |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::glibc_date_1_format |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::glibc_date_format |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::glibc_datetime_format |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::glibc_time_12_format |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::glibc_time_format |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::month_format_abbreviated |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::month_format_narrow |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::month_format_wide |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::month_stand_alone_abbreviated |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::month_stand_alone_narrow |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::month_stand_alone_wide |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::quarter_format_abbreviated |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::quarter_format_narrow |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::quarter_format_wide |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::quarter_stand_alone_abbreviated |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::quarter_stand_alone_narrow |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::quarter_stand_alone_wide |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::time_format_full |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::time_format_long |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::time_format_medium |
| 0 | 0 | 0 | 0s | 0s | DateTime::Locale::root::time_format_short |
| Line | State ments |
Time on line |
Calls | Time in subs |
Code |
|---|---|---|---|---|---|
| 1 | ########################################################################### | ||||
| 2 | # | ||||
| 3 | # This file is auto-generated by the Perl DateTime Suite locale | ||||
| 4 | # generator (0.05). This code generator comes with the | ||||
| 5 | # DateTime::Locale distribution in the tools/ directory, and is called | ||||
| 6 | # generate-from-cldr. | ||||
| 7 | # | ||||
| 8 | # This file as generated from the CLDR XML locale data. See the | ||||
| 9 | # LICENSE.cldr file included in this distribution for license details. | ||||
| 10 | # | ||||
| 11 | # This file was generated from the source file root.xml | ||||
| 12 | # The source file version number was 1.192, generated on | ||||
| 13 | # 2009/06/15 21:39:59. | ||||
| 14 | # | ||||
| 15 | # Do not edit this file directly. | ||||
| 16 | # | ||||
| 17 | ########################################################################### | ||||
| 18 | |||||
| 19 | package DateTime::Locale::root; | ||||
| 20 | |||||
| 21 | 3 | 20µs | 2 | 17µs | # spent 15µs (13+2) within DateTime::Locale::root::BEGIN@21 which was called:
# once (13µs+2µs) by base::import at line 21 # spent 15µs making 1 call to DateTime::Locale::root::BEGIN@21
# spent 2µs making 1 call to strict::import |
| 22 | 3 | 16µs | 2 | 22µs | # spent 14µs (7+7) within DateTime::Locale::root::BEGIN@22 which was called:
# once (7µs+7µs) by base::import at line 22 # spent 14µs making 1 call to DateTime::Locale::root::BEGIN@22
# spent 7µs making 1 call to warnings::import |
| 23 | 3 | 17µs | 2 | 9µs | # spent 7µs (6+1) within DateTime::Locale::root::BEGIN@23 which was called:
# once (6µs+1µs) by base::import at line 23 # spent 7µs making 1 call to DateTime::Locale::root::BEGIN@23
# spent 1µs making 1 call to utf8::import |
| 24 | |||||
| 25 | 3 | 1.40ms | 2 | 69µs | # spent 69µs (7+62) within DateTime::Locale::root::BEGIN@25 which was called:
# once (7µs+62µs) by base::import at line 25 # spent 69µs making 1 call to DateTime::Locale::root::BEGIN@25
# spent 62µs making 1 call to base::import, recursion: max depth 2, sum of overlapping time 62µs |
| 26 | |||||
| 27 | sub cldr_version { return "1\.7\.1" } | ||||
| 28 | |||||
| 29 | { | ||||
| 30 | 2 | 2µs | my $am_pm_abbreviated = [ "AM", "PM" ]; | ||
| 31 | sub am_pm_abbreviated { return $am_pm_abbreviated } | ||||
| 32 | } | ||||
| 33 | { | ||||
| 34 | 2 | 900ns | my $date_format_full = "EEEE\,\ y\ MMMM\ dd"; | ||
| 35 | sub date_format_full { return $date_format_full } | ||||
| 36 | } | ||||
| 37 | |||||
| 38 | { | ||||
| 39 | 2 | 600ns | my $date_format_long = "y\ MMMM\ d"; | ||
| 40 | sub date_format_long { return $date_format_long } | ||||
| 41 | } | ||||
| 42 | |||||
| 43 | { | ||||
| 44 | 2 | 600ns | my $date_format_medium = "y\ MMM\ d"; | ||
| 45 | sub date_format_medium { return $date_format_medium } | ||||
| 46 | } | ||||
| 47 | |||||
| 48 | { | ||||
| 49 | 2 | 500ns | my $date_format_short = "yyyy\-MM\-dd"; | ||
| 50 | sub date_format_short { return $date_format_short } | ||||
| 51 | } | ||||
| 52 | |||||
| 53 | { | ||||
| 54 | 2 | 600ns | my $datetime_format = "\{1\}\ \{0\}"; | ||
| 55 | sub datetime_format { return $datetime_format } | ||||
| 56 | } | ||||
| 57 | |||||
| 58 | { | ||||
| 59 | 2 | 1µs | my $day_format_abbreviated = [ "2", "3", "4", "5", "6", "7", "1" ]; | ||
| 60 | sub day_format_abbreviated { return $day_format_abbreviated } | ||||
| 61 | } | ||||
| 62 | { | ||||
| 63 | 2 | 1µs | my $day_format_narrow = [ "2", "3", "4", "5", "6", "7", "1" ]; | ||
| 64 | sub day_format_narrow { return $day_format_narrow } | ||||
| 65 | } | ||||
| 66 | { | ||||
| 67 | 2 | 1µs | my $day_format_wide = [ "2", "3", "4", "5", "6", "7", "1" ]; | ||
| 68 | sub day_format_wide { return $day_format_wide } | ||||
| 69 | } | ||||
| 70 | { | ||||
| 71 | 2 | 1µs | my $day_stand_alone_abbreviated = [ "2", "3", "4", "5", "6", "7", "1" ]; | ||
| 72 | sub day_stand_alone_abbreviated { return $day_stand_alone_abbreviated } | ||||
| 73 | } | ||||
| 74 | { | ||||
| 75 | 2 | 1µs | my $day_stand_alone_narrow = [ "2", "3", "4", "5", "6", "7", "1" ]; | ||
| 76 | sub day_stand_alone_narrow { return $day_stand_alone_narrow } | ||||
| 77 | } | ||||
| 78 | { | ||||
| 79 | 2 | 1µs | my $day_stand_alone_wide = [ "2", "3", "4", "5", "6", "7", "1" ]; | ||
| 80 | sub day_stand_alone_wide { return $day_stand_alone_wide } | ||||
| 81 | } | ||||
| 82 | { | ||||
| 83 | 2 | 900ns | my $era_abbreviated = [ "BCE", "CE" ]; | ||
| 84 | sub era_abbreviated { return $era_abbreviated } | ||||
| 85 | } | ||||
| 86 | { | ||||
| 87 | 2 | 800ns | my $era_narrow = [ "BCE", "CE" ]; | ||
| 88 | sub era_narrow { return $era_narrow } | ||||
| 89 | } | ||||
| 90 | { | ||||
| 91 | 2 | 800ns | my $era_wide = [ "BCE", "CE" ]; | ||
| 92 | sub era_wide { return $era_wide } | ||||
| 93 | } | ||||
| 94 | { | ||||
| 95 | 2 | 600ns | my $first_day_of_week = "1"; | ||
| 96 | sub first_day_of_week { return $first_day_of_week } | ||||
| 97 | } | ||||
| 98 | |||||
| 99 | { | ||||
| 100 | 2 | 2µs | my $month_format_abbreviated = [ "1", "2", "3", "4", "5", "6", "7", "8", "9", "10", "11", "12" ]; | ||
| 101 | sub month_format_abbreviated { return $month_format_abbreviated } | ||||
| 102 | } | ||||
| 103 | { | ||||
| 104 | 2 | 2µs | my $month_format_narrow = [ "1", "2", "3", "4", "5", "6", "7", "8", "9", "10", "11", "12" ]; | ||
| 105 | sub month_format_narrow { return $month_format_narrow } | ||||
| 106 | } | ||||
| 107 | { | ||||
| 108 | 2 | 7µs | my $month_format_wide = [ "1", "2", "3", "4", "5", "6", "7", "8", "9", "10", "11", "12" ]; | ||
| 109 | sub month_format_wide { return $month_format_wide } | ||||
| 110 | } | ||||
| 111 | { | ||||
| 112 | 2 | 2µs | my $month_stand_alone_abbreviated = [ "1", "2", "3", "4", "5", "6", "7", "8", "9", "10", "11", "12" ]; | ||
| 113 | sub month_stand_alone_abbreviated { return $month_stand_alone_abbreviated } | ||||
| 114 | } | ||||
| 115 | { | ||||
| 116 | 2 | 2µs | my $month_stand_alone_narrow = [ "1", "2", "3", "4", "5", "6", "7", "8", "9", "10", "11", "12" ]; | ||
| 117 | sub month_stand_alone_narrow { return $month_stand_alone_narrow } | ||||
| 118 | } | ||||
| 119 | { | ||||
| 120 | 2 | 2µs | my $month_stand_alone_wide = [ "1", "2", "3", "4", "5", "6", "7", "8", "9", "10", "11", "12" ]; | ||
| 121 | sub month_stand_alone_wide { return $month_stand_alone_wide } | ||||
| 122 | } | ||||
| 123 | { | ||||
| 124 | 2 | 1µs | my $quarter_format_abbreviated = [ "Q1", "Q2", "Q3", "Q4" ]; | ||
| 125 | sub quarter_format_abbreviated { return $quarter_format_abbreviated } | ||||
| 126 | } | ||||
| 127 | { | ||||
| 128 | 2 | 1µs | my $quarter_format_narrow = [ "1", "2", "3", "4" ]; | ||
| 129 | sub quarter_format_narrow { return $quarter_format_narrow } | ||||
| 130 | } | ||||
| 131 | { | ||||
| 132 | 2 | 1µs | my $quarter_format_wide = [ "Q1", "Q2", "Q3", "Q4" ]; | ||
| 133 | sub quarter_format_wide { return $quarter_format_wide } | ||||
| 134 | } | ||||
| 135 | { | ||||
| 136 | 2 | 1µs | my $quarter_stand_alone_abbreviated = [ "Q1", "Q2", "Q3", "Q4" ]; | ||
| 137 | sub quarter_stand_alone_abbreviated { return $quarter_stand_alone_abbreviated } | ||||
| 138 | } | ||||
| 139 | { | ||||
| 140 | 2 | 1µs | my $quarter_stand_alone_narrow = [ "1", "2", "3", "4" ]; | ||
| 141 | sub quarter_stand_alone_narrow { return $quarter_stand_alone_narrow } | ||||
| 142 | } | ||||
| 143 | { | ||||
| 144 | 2 | 1µs | my $quarter_stand_alone_wide = [ "Q1", "Q2", "Q3", "Q4" ]; | ||
| 145 | sub quarter_stand_alone_wide { return $quarter_stand_alone_wide } | ||||
| 146 | } | ||||
| 147 | { | ||||
| 148 | 2 | 700ns | my $time_format_full = "HH\:mm\:ss\ zzzz"; | ||
| 149 | sub time_format_full { return $time_format_full } | ||||
| 150 | } | ||||
| 151 | |||||
| 152 | { | ||||
| 153 | 2 | 600ns | my $time_format_long = "HH\:mm\:ss\ z"; | ||
| 154 | sub time_format_long { return $time_format_long } | ||||
| 155 | } | ||||
| 156 | |||||
| 157 | { | ||||
| 158 | 2 | 500ns | my $time_format_medium = "HH\:mm\:ss"; | ||
| 159 | sub time_format_medium { return $time_format_medium } | ||||
| 160 | } | ||||
| 161 | |||||
| 162 | { | ||||
| 163 | 2 | 500ns | my $time_format_short = "HH\:mm"; | ||
| 164 | sub time_format_short { return $time_format_short } | ||||
| 165 | } | ||||
| 166 | |||||
| 167 | { | ||||
| 168 | 2 | 500ns | my $_default_date_format_length = "medium"; | ||
| 169 | 1 | 4µs | # spent 1µs within DateTime::Locale::root::_default_date_format_length which was called:
# once (1µs+0s) by DateTime::Locale::Base::new at line 35 of DateTime/Locale/Base.pm | ||
| 170 | } | ||||
| 171 | |||||
| 172 | { | ||||
| 173 | 2 | 500ns | my $_default_time_format_length = "medium"; | ||
| 174 | 1 | 3µs | # spent 1µs within DateTime::Locale::root::_default_time_format_length which was called:
# once (1µs+0s) by DateTime::Locale::Base::new at line 35 of DateTime/Locale/Base.pm | ||
| 175 | } | ||||
| 176 | |||||
| 177 | { | ||||
| 178 | 2 | 600ns | my $_format_for_EEEd = "d\ EEE"; | ||
| 179 | sub _format_for_EEEd { return $_format_for_EEEd } | ||||
| 180 | } | ||||
| 181 | |||||
| 182 | { | ||||
| 183 | 2 | 600ns | my $_format_for_Hm = "H\:mm"; | ||
| 184 | sub _format_for_Hm { return $_format_for_Hm } | ||||
| 185 | } | ||||
| 186 | |||||
| 187 | { | ||||
| 188 | 2 | 500ns | my $_format_for_Hms = "H\:mm\:ss"; | ||
| 189 | sub _format_for_Hms { return $_format_for_Hms } | ||||
| 190 | } | ||||
| 191 | |||||
| 192 | { | ||||
| 193 | 2 | 600ns | my $_format_for_M = "L"; | ||
| 194 | sub _format_for_M { return $_format_for_M } | ||||
| 195 | } | ||||
| 196 | |||||
| 197 | { | ||||
| 198 | 2 | 500ns | my $_format_for_MEd = "E\,\ M\-d"; | ||
| 199 | sub _format_for_MEd { return $_format_for_MEd } | ||||
| 200 | } | ||||
| 201 | |||||
| 202 | { | ||||
| 203 | 2 | 500ns | my $_format_for_MMM = "LLL"; | ||
| 204 | sub _format_for_MMM { return $_format_for_MMM } | ||||
| 205 | } | ||||
| 206 | |||||
| 207 | { | ||||
| 208 | 2 | 600ns | my $_format_for_MMMEd = "E\ MMM\ d"; | ||
| 209 | sub _format_for_MMMEd { return $_format_for_MMMEd } | ||||
| 210 | } | ||||
| 211 | |||||
| 212 | { | ||||
| 213 | 2 | 500ns | my $_format_for_MMMMEd = "E\ MMMM\ d"; | ||
| 214 | sub _format_for_MMMMEd { return $_format_for_MMMMEd } | ||||
| 215 | } | ||||
| 216 | |||||
| 217 | { | ||||
| 218 | 2 | 500ns | my $_format_for_MMMMd = "MMMM\ d"; | ||
| 219 | sub _format_for_MMMMd { return $_format_for_MMMMd } | ||||
| 220 | } | ||||
| 221 | |||||
| 222 | { | ||||
| 223 | 2 | 600ns | my $_format_for_MMMd = "MMM\ d"; | ||
| 224 | sub _format_for_MMMd { return $_format_for_MMMd } | ||||
| 225 | } | ||||
| 226 | |||||
| 227 | { | ||||
| 228 | 2 | 500ns | my $_format_for_Md = "M\-d"; | ||
| 229 | sub _format_for_Md { return $_format_for_Md } | ||||
| 230 | } | ||||
| 231 | |||||
| 232 | { | ||||
| 233 | 2 | 500ns | my $_format_for_d = "d"; | ||
| 234 | sub _format_for_d { return $_format_for_d } | ||||
| 235 | } | ||||
| 236 | |||||
| 237 | { | ||||
| 238 | 2 | 500ns | my $_format_for_hm = "h\:mm\ a"; | ||
| 239 | sub _format_for_hm { return $_format_for_hm } | ||||
| 240 | } | ||||
| 241 | |||||
| 242 | { | ||||
| 243 | 2 | 600ns | my $_format_for_hms = "h\:mm\:ss\ a"; | ||
| 244 | sub _format_for_hms { return $_format_for_hms } | ||||
| 245 | } | ||||
| 246 | |||||
| 247 | { | ||||
| 248 | 2 | 600ns | my $_format_for_ms = "mm\:ss"; | ||
| 249 | sub _format_for_ms { return $_format_for_ms } | ||||
| 250 | } | ||||
| 251 | |||||
| 252 | { | ||||
| 253 | 2 | 400ns | my $_format_for_y = "y"; | ||
| 254 | sub _format_for_y { return $_format_for_y } | ||||
| 255 | } | ||||
| 256 | |||||
| 257 | { | ||||
| 258 | 2 | 500ns | my $_format_for_yM = "y\-M"; | ||
| 259 | sub _format_for_yM { return $_format_for_yM } | ||||
| 260 | } | ||||
| 261 | |||||
| 262 | { | ||||
| 263 | 2 | 500ns | my $_format_for_yMEd = "EEE\,\ y\-M\-d"; | ||
| 264 | sub _format_for_yMEd { return $_format_for_yMEd } | ||||
| 265 | } | ||||
| 266 | |||||
| 267 | { | ||||
| 268 | 2 | 600ns | my $_format_for_yMMM = "y\ MMM"; | ||
| 269 | sub _format_for_yMMM { return $_format_for_yMMM } | ||||
| 270 | } | ||||
| 271 | |||||
| 272 | { | ||||
| 273 | 2 | 600ns | my $_format_for_yMMMEd = "EEE\,\ y\ MMM\ d"; | ||
| 274 | sub _format_for_yMMMEd { return $_format_for_yMMMEd } | ||||
| 275 | } | ||||
| 276 | |||||
| 277 | { | ||||
| 278 | 2 | 600ns | my $_format_for_yMMMM = "y\ MMMM"; | ||
| 279 | sub _format_for_yMMMM { return $_format_for_yMMMM } | ||||
| 280 | } | ||||
| 281 | |||||
| 282 | { | ||||
| 283 | 2 | 500ns | my $_format_for_yQ = "y\ Q"; | ||
| 284 | sub _format_for_yQ { return $_format_for_yQ } | ||||
| 285 | } | ||||
| 286 | |||||
| 287 | { | ||||
| 288 | 2 | 500ns | my $_format_for_yQQQ = "y\ QQQ"; | ||
| 289 | sub _format_for_yQQQ { return $_format_for_yQQQ } | ||||
| 290 | } | ||||
| 291 | |||||
| 292 | { | ||||
| 293 | 2 | 19µs | my $_available_formats = | ||
| 294 | { | ||||
| 295 | "EEEd" => "d\ EEE", | ||||
| 296 | "Hm" => "H\:mm", | ||||
| 297 | "Hms" => "H\:mm\:ss", | ||||
| 298 | "M" => "L", | ||||
| 299 | "MEd" => "E\,\ M\-d", | ||||
| 300 | "MMM" => "LLL", | ||||
| 301 | "MMMEd" => "E\ MMM\ d", | ||||
| 302 | "MMMMEd" => "E\ MMMM\ d", | ||||
| 303 | "MMMMd" => "MMMM\ d", | ||||
| 304 | "MMMd" => "MMM\ d", | ||||
| 305 | "Md" => "M\-d", | ||||
| 306 | "d" => "d", | ||||
| 307 | "hm" => "h\:mm\ a", | ||||
| 308 | "hms" => "h\:mm\:ss\ a", | ||||
| 309 | "ms" => "mm\:ss", | ||||
| 310 | "y" => "y", | ||||
| 311 | "yM" => "y\-M", | ||||
| 312 | "yMEd" => "EEE\,\ y\-M\-d", | ||||
| 313 | "yMMM" => "y\ MMM", | ||||
| 314 | "yMMMEd" => "EEE\,\ y\ MMM\ d", | ||||
| 315 | "yMMMM" => "y\ MMMM", | ||||
| 316 | "yQ" => "y\ Q", | ||||
| 317 | "yQQQ" => "y\ QQQ" | ||||
| 318 | }; | ||||
| 319 | sub _available_formats { return $_available_formats } | ||||
| 320 | } | ||||
| 321 | |||||
| 322 | { | ||||
| 323 | 2 | 500ns | my $glibc_date_format = "\%m\/\%d\/\%y"; | ||
| 324 | sub glibc_date_format { return $glibc_date_format } | ||||
| 325 | } | ||||
| 326 | |||||
| 327 | { | ||||
| 328 | 2 | 600ns | my $glibc_date_1_format = "\%a\ \%b\ \%e\ \%H\:\%M\:\%S\ \%Z\ \%Y"; | ||
| 329 | sub glibc_date_1_format { return $glibc_date_1_format } | ||||
| 330 | } | ||||
| 331 | |||||
| 332 | { | ||||
| 333 | 2 | 600ns | my $glibc_datetime_format = "\%a\ \%b\ \%e\ \%H\:\%M\:\%S\ \%Y"; | ||
| 334 | sub glibc_datetime_format { return $glibc_datetime_format } | ||||
| 335 | } | ||||
| 336 | |||||
| 337 | { | ||||
| 338 | 2 | 500ns | my $glibc_time_format = "\%H\:\%M\:\%S"; | ||
| 339 | sub glibc_time_format { return $glibc_time_format } | ||||
| 340 | } | ||||
| 341 | |||||
| 342 | { | ||||
| 343 | 2 | 500ns | my $glibc_time_12_format = "\%I\:\%M\:\%S\ \%p"; | ||
| 344 | sub glibc_time_12_format { return $glibc_time_12_format } | ||||
| 345 | } | ||||
| 346 | |||||
| 347 | 1 | 40µs | 1; | ||
| 348 | |||||
| 349 | __END__ |