← Index
Performance Profile   « block view • line view • sub view »
For t/test-parsing
  Run on Sun Nov 14 09:49:57 2010
Reported on Sun Nov 14 09:50:07 2010

File /usr/share/perl/5.10/bytes.pm
Statements Executed 6
Total Time 1.44e-05 seconds
Subroutines — ordered by exclusive time
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
33327µs27µsbytes::::importbytes::import
0000s0sbytes::::AUTOLOADbytes::AUTOLOAD
0000s0sbytes::::unimportbytes::unimport
LineStmts.Exclusive
Time
Avg.Code
1package bytes;
2
31700ns700nsour $VERSION = '1.03';
4
51400ns400ns$bytes::hint_bits = 0x00000008;
6
7
# spent 27µs within bytes::import which was called 3 times, avg 9µs/call: # once (10µs+0s) by Data::Dumper::BEGIN or Data::Dumper::qquote at line 663 of /usr/lib/perl/5.10/Data/Dumper.pm # once (9µs+0s) by Encode::utf8::BEGIN or Encode::predefine_encodings or Encode::utf8::__ANON__[/usr/local/lib/perl/5.10.0/Encode.pm:319] at line 309 of /usr/local/lib/perl/5.10.0/Encode.pm # once (8µs+0s) by charnames::charnames at line 174 of /usr/share/perl/5.10/charnames.pm
sub import {
839µs3µ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
2914µs4µs1;
30__END__
31