← Index
NYTProf Performance Profile   « line view »
For script/ponapi
  Run on Wed Feb 10 15:51:26 2016
Reported on Thu Feb 11 09:43:09 2016

Filename/usr/share/perl/5.18/bytes.pm
StatementsExecuted 9 statements in 27µs
Subroutines
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
6669µs9µsbytes::::importbytes::import
0000s0sbytes::::AUTOLOADbytes::AUTOLOAD
0000s0sbytes::::unimportbytes::unimport
Call graph for these subroutines as a Graphviz dot language file.
Line State
ments
Time
on line
Calls Time
in subs
Code
1package bytes;
2
31400nsour $VERSION = '1.04';
4
51100ns$bytes::hint_bits = 0x00000008;
6
7
# spent 9µs within bytes::import which was called 6 times, avg 2µs/call: # once (3µs+0s) by Data::Dumper::BEGIN@721 at line 721 of Data/Dumper.pm # once (2µs+0s) by HTTP::Body::OctetStream::BEGIN@8 at line 8 of HTTP/Body/OctetStream.pm # once (1µs+0s) by HTTP::Body::XFormsMultipart::BEGIN@8 at line 8 of HTTP/Body/XFormsMultipart.pm # once (1µs+0s) by HTTP::Body::UrlEncoded::BEGIN@8 at line 8 of HTTP/Body/UrlEncoded.pm # once (1µs+0s) by HTTP::Body::MultiPart::BEGIN@8 at line 8 of HTTP/Body/MultiPart.pm # once (1µs+0s) by HTTP::Body::XForms::BEGIN@8 at line 8 of HTTP/Body/XForms.pm
sub import {
8624µs $^H |= $bytes::hint_bits;
9}
10
11sub unimport {
12 $^H &= ~$bytes::hint_bits;
13}
14
15sub AUTOLOAD {
16 require "bytes_heavy.pl";
17 goto &$AUTOLOAD if defined &$AUTOLOAD;
18 require Carp;
19 Carp::croak("Undefined subroutine $AUTOLOAD called");
20}
21
22sub length (_);
23sub chr (_);
24sub ord (_);
25sub substr ($$;$$);
26sub index ($$;$);
27sub rindex ($$;$);
28
2912µs1;
30__END__