Filename | /usr/share/perl5/utf8.pm |
Statements | Executed 7 statements in 26µs |
Calls | P | F | Exclusive Time |
Inclusive Time |
Subroutine |
---|---|---|---|---|---|
108 | 3 | 3 | 62µs | 62µs | is_utf8 (xsub) | utf8::
99 | 1 | 1 | 56µs | 56µs | downgrade (xsub) | utf8::
2 | 2 | 2 | 16µs | 16µs | import | utf8::
0 | 0 | 0 | 0s | 0s | AUTOLOAD | utf8::
0 | 0 | 0 | 0s | 0s | unimport | utf8::
Line | State ments |
Time on line |
Calls | Time in subs |
Code |
---|---|---|---|---|---|
1 | package utf8; | ||||
2 | |||||
3 | 1 | 400ns | $utf8::hint_bits = 0x00800000; | ||
4 | |||||
5 | 1 | 300ns | our $VERSION = '1.09'; | ||
6 | |||||
7 | # spent 16µs within utf8::import which was called 2 times, avg 8µs/call:
# once (13µs+0s) by Locale::Maketext::BEGIN@17 at line 21 of Locale/Maketext.pm
# once (3µs+0s) by Foswiki::Logger::PlainFile::BEGIN@6 at line 6 of /var/www/foswiki11/lib/Foswiki/Logger/PlainFile.pm | ||||
8 | 2 | 4µs | $^H |= $utf8::hint_bits; | ||
9 | 2 | 18µs | $enc{caller()} = $_[1] if $_[1]; | ||
10 | } | ||||
11 | |||||
12 | sub unimport { | ||||
13 | $^H &= ~$utf8::hint_bits; | ||||
14 | } | ||||
15 | |||||
16 | sub AUTOLOAD { | ||||
17 | require "utf8_heavy.pl"; | ||||
18 | goto &$AUTOLOAD if defined &$AUTOLOAD; | ||||
19 | require Carp; | ||||
20 | Carp::croak("Undefined subroutine $AUTOLOAD called"); | ||||
21 | } | ||||
22 | |||||
23 | 1 | 3µs | 1; | ||
24 | __END__ | ||||
# spent 56µs within utf8::downgrade which was called 99 times, avg 569ns/call:
# 99 times (56µs+0s) by Carp::format_arg at line 194 of Carp.pm, avg 569ns/call | |||||
# spent 62µs within utf8::is_utf8 which was called 108 times, avg 575ns/call:
# 104 times (55µs+0s) by Carp::format_arg at line 205 of Carp.pm, avg 529ns/call
# 3 times (5µs+0s) by Foswiki::Logger::PlainFile::log at line 94 of /var/www/foswiki11/lib/Foswiki/Logger/PlainFile.pm, avg 2µs/call
# once (2µs+0s) by Foswiki::Response::body at line 367 of /var/www/foswiki11/lib/Foswiki/Response.pm |