Filename	/home/doy/perl5/perlbrew/perls/perl-5.10.1/lib/site_perl/5.10.1/x86_64-linux/PadWalker.pm
Statements	Executed 15 statements in 698µs

Subroutines

Calls	P	F	Exclusive Time	Inclusive Time	Subroutine
1	1	1	128µs	128µs	PadWalker::::bootstrapPadWalker::bootstrap (xsub)
1	1	1	74µs	92µs	PadWalker::::BEGIN@3PadWalker::BEGIN@3
1	1	1	37µs	346µs	PadWalker::::BEGIN@4PadWalker::BEGIN@4

Call graph for these subroutines as a Graphviz dot language file.

Line	State ments	Time on line	Calls	Time in subs	Code
1					package PadWalker;
2
3	3	120µs	2	110µs	# spent 92µs (74+18) within PadWalker::BEGIN@3 which was called: # once (74µs+18µs) by Devel::Caller::BEGIN@5 at line 3 use strict; # spent 92µs making 1 call to PadWalker::BEGIN@3 # spent 18µs making 1 call to strict::import
4	3	384µs	2	655µs	# spent 346µs (37+309) within PadWalker::BEGIN@4 which was called: # once (37µs+309µs) by Devel::Caller::BEGIN@5 at line 4 use vars qw($VERSION @ISA @EXPORT_OK %EXPORT_TAGS); # spent 346µs making 1 call to PadWalker::BEGIN@4 # spent 309µs making 1 call to vars::import
5
6	1	3µs			require Exporter;
7	1	3µs			require DynaLoader;
8
9	1	62µs			require 5.008;
10
11	1	44µs			@ISA = qw(Exporter DynaLoader);
12	1	8µs			@EXPORT_OK = qw(peek_my peek_our closed_over peek_sub var_name set_closed_over);
13	1	5µs			%EXPORT_TAGS = (all => \@EXPORT_OK);
14
15	1	3µs			$VERSION = '1.92';
16
17	1	27µs	1	1.05ms	bootstrap PadWalker $VERSION; # spent 1.05ms making 1 call to DynaLoader::bootstrap
18
19					sub peek_my;
20					sub peek_our;
21					sub closed_over;
22					sub peek_sub;
23					sub var_name;
24
25	1	39µs			1;
26					__END__
					# spent 128µs within PadWalker::bootstrap which was called: # once (128µs+0s) by DynaLoader::bootstrap at line 223 of DynaLoader.pm sub PadWalker::bootstrap; # xsub