Filename | /usr/share/perl/5.10/bytes.pm |
Statements | Executed 34 statements in 422µs |
Calls | P | F | Exclusive Time |
Inclusive Time |
Subroutine |
---|---|---|---|---|---|
1 | 1 | 1 | 449µs | 530µs | AUTOLOAD | bytes::
29 | 29 | 23 | 125µs | 125µs | import | bytes::
0 | 0 | 0 | 0s | 0s | unimport | bytes::
Line | State ments |
Time on line |
Calls | Time in subs |
Code |
---|---|---|---|---|---|
1 | package bytes; | ||||
2 | |||||
3 | 1 | 700ns | our $VERSION = '1.03'; | ||
4 | |||||
5 | 1 | 200ns | $bytes::hint_bits = 0x00000008; | ||
6 | |||||
7 | # spent 125µs within bytes::import which was called 29 times, avg 4µs/call:
# once (9µs+0s) by Data::Dumper::BEGIN@683 at line 683 of Data/Dumper.pm
# once (8µs+0s) by Template::Provider::BEGIN@1089 at line 1089 of Template/Provider.pm
# once (7µs+0s) by IO::Compress::Base::Common::BEGIN@5 at line 5 of IO/Compress/Base/Common.pm
# once (7µs+0s) by JSON::PP::BEGIN@696 at line 696 of JSON/PP.pm
# once (7µs+0s) by Convert::ASN1::BEGIN@7 at line 9 of Convert/ASN1/_decode.pm
# once (6µs+0s) by IO::Compress::RawDeflate::BEGIN@7 at line 7 of IO/Compress/RawDeflate.pm
# once (5µs+0s) by bytes::BEGIN@4 at line 4 of bytes_heavy.pl
# once (5µs+0s) by Encode::utf8::BEGIN@309 at line 309 of Encode.pm
# once (5µs+0s) by Convert::ASN1::BEGIN@10.13 at line 12 of Convert/ASN1/IO.pm
# once (5µs+0s) by charnames::BEGIN@174 at line 174 of charnames.pm
# once (5µs+0s) by IO::Uncompress::Adapter::Inflate::BEGIN@5 at line 5 of IO/Uncompress/Adapter/Inflate.pm
# once (5µs+0s) by IO::Uncompress::Base::BEGIN@6 at line 6 of IO/Uncompress/Base.pm
# once (5µs+0s) by Cache::Memcached::BEGIN@487 at line 487 of Cache/Memcached.pm
# once (4µs+0s) by Compress::Raw::Zlib::BEGIN@13 at line 13 of Compress/Raw/Zlib.pm
# once (4µs+0s) by Convert::ASN1::BEGIN@16 at line 18 of Convert/ASN1.pm
# once (4µs+0s) by IO::Uncompress::RawInflate::BEGIN@6 at line 6 of IO/Uncompress/RawInflate.pm
# once (3µs+0s) by Cache::Memcached::BEGIN@652 at line 652 of Cache/Memcached.pm
# once (3µs+0s) by IO::Compress::Gzip::BEGIN@8 at line 8 of IO/Compress/Gzip.pm
# once (3µs+0s) by IO::Uncompress::Gunzip::BEGIN@10 at line 10 of IO/Uncompress/Gunzip.pm
# once (3µs+0s) by Compress::Zlib::BEGIN@18 at line 18 of Compress/Zlib.pm
# once (3µs+0s) by IO::Compress::Adapter::Deflate::BEGIN@5 at line 5 of IO/Compress/Adapter/Deflate.pm
# once (3µs+0s) by IO::Compress::Zlib::Extra::BEGIN@7 at line 7 of IO/Compress/Zlib/Extra.pm
# once (3µs+0s) by IO::Compress::Base::BEGIN@18 at line 18 of IO/Compress/Base.pm
# once (3µs+0s) by IO::Compress::Gzip::Constants::BEGIN@5 at line 5 of IO/Compress/Gzip/Constants.pm
# once (3µs+0s) by bytes::BEGIN@34 at line 34 of bytes_heavy.pl
# once (2µs+0s) by bytes::BEGIN@22 at line 22 of bytes_heavy.pl
# once (2µs+0s) by bytes::BEGIN@9 at line 9 of bytes_heavy.pl
# once (2µs+0s) by bytes::BEGIN@17 at line 17 of bytes_heavy.pl
# once (2µs+0s) by bytes::BEGIN@27 at line 27 of bytes_heavy.pl | ||||
8 | 29 | 276µs | $^H |= $bytes::hint_bits; | ||
9 | } | ||||
10 | |||||
11 | sub unimport { | ||||
12 | $^H &= ~$bytes::hint_bits; | ||||
13 | } | ||||
14 | |||||
15 | # spent 530µs (449+81) within bytes::AUTOLOAD which was called:
# once (449µs+81µs) by MARC::File::USMARC::decode at line 126 of MARC/File/USMARC.pm | ||||
16 | 2 | 142µs | require "bytes_heavy.pl"; | ||
17 | 1 | 2µs | goto &$AUTOLOAD if defined &$AUTOLOAD; # spent 2µs making 1 call to bytes::length | ||
18 | require Carp; | ||||
19 | Carp::croak("Undefined subroutine $AUTOLOAD called"); | ||||
20 | } | ||||
21 | |||||
22 | sub length (_); | ||||
23 | sub chr (_); | ||||
24 | sub ord (_); | ||||
25 | sub substr ($$;$$); | ||||
26 | sub index ($$;$); | ||||
27 | sub rindex ($$;$); | ||||
28 | |||||
29 | 1 | 4µs | 1; | ||
30 | __END__ |