Filename | /home/micha/.plenv/versions/5.38.2/lib/perl5/5.38.2/bytes.pm |
Statements | Executed 12 statements in 164µs |
Calls | P | F | Exclusive Time |
Inclusive Time |
Subroutine |
---|---|---|---|---|---|
1 | 1 | 1 | 14µs | 28µs | BEGIN@4 | bytes::
1 | 1 | 1 | 9µs | 10µs | BEGIN@3 | bytes::
5 | 5 | 4 | 8µs | 8µs | import | bytes::
0 | 0 | 0 | 0s | 0s | AUTOLOAD | bytes::
0 | 0 | 0 | 0s | 0s | unimport | bytes::
Line | State ments |
Time on line |
Calls | Time in subs |
Code |
---|---|---|---|---|---|
1 | package bytes; | ||||
2 | |||||
3 | 2 | 31µs | 2 | 12µs | # spent 10µs (9+1) within bytes::BEGIN@3 which was called:
# once (9µs+1µs) by Compress::Raw::Zlib::BEGIN@10 at line 3 # spent 10µs making 1 call to bytes::BEGIN@3
# spent 1µs making 1 call to strict::import |
4 | 2 | 106µs | 2 | 42µs | # spent 28µs (14+14) within bytes::BEGIN@4 which was called:
# once (14µs+14µs) by Compress::Raw::Zlib::BEGIN@10 at line 4 # spent 28µs making 1 call to bytes::BEGIN@4
# spent 14µs making 1 call to warnings::import |
5 | |||||
6 | 1 | 200ns | our $VERSION = '1.08'; | ||
7 | |||||
8 | 1 | 100ns | $bytes::hint_bits = 0x00000008; | ||
9 | |||||
10 | # spent 8µs within bytes::import which was called 5 times, avg 2µs/call:
# once (2µs+0s) by JSON::PP::BEGIN@790 at line 790 of JSON/PP.pm
# once (2µs+0s) by XML::Twig::BEGIN@2455 at line 2455 of XML/Twig.pm
# once (2µs+0s) by Compress::Raw::Zlib::BEGIN@10 at line 10 of Compress/Raw/Zlib.pm
# once (1µs+0s) by Encode::utf8::BEGIN@229 at line 229 of Encode.pm
# once (1µs+0s) by JSON::PP::IncrParser::BEGIN@1547 at line 1547 of JSON/PP.pm | ||||
11 | 5 | 25µs | $^H |= $bytes::hint_bits; | ||
12 | } | ||||
13 | |||||
14 | sub unimport { | ||||
15 | $^H &= ~$bytes::hint_bits; | ||||
16 | } | ||||
17 | |||||
18 | our $AUTOLOAD; | ||||
19 | sub AUTOLOAD { | ||||
20 | require "bytes_heavy.pl"; | ||||
21 | goto &$AUTOLOAD if defined &$AUTOLOAD; | ||||
22 | require Carp; | ||||
23 | Carp::croak("Undefined subroutine $AUTOLOAD called"); | ||||
24 | } | ||||
25 | |||||
26 | sub length (_); | ||||
27 | sub chr (_); | ||||
28 | sub ord (_); | ||||
29 | sub substr ($$;$$); | ||||
30 | sub index ($$;$); | ||||
31 | sub rindex ($$;$); | ||||
32 | |||||
33 | 1 | 2µs | 1; | ||
34 | __END__ |