Filename	/usr/share/perl/5.20/Carp/Heavy.pm
Statements	Executed 6 statements in 97µs

Subroutines

Calls	P	F	Exclusive Time	Inclusive Time	Subroutine
1	1	1	13µs	13µs	Carp::Heavy::::BEGIN@3Carp::Heavy::BEGIN@3

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

Line	State ments	Time on line	Calls	Time in subs	Code
1					package Carp::Heavy;
2
3	2	90µs	1	13µs	# spent 13µs within Carp::Heavy::BEGIN@3 which was called: # once (13µs+0s) by parent::import at line 3 use Carp (); # spent 13µs making 1 call to Carp::Heavy::BEGIN@3
4
5	1	500ns			our $VERSION = '1.3301';
6
7	1	1µs			my $cv = defined($Carp::VERSION) ? $Carp::VERSION : "undef";
8	1	500ns			if($cv ne $VERSION) {
9					die "Version mismatch between Carp $cv ($INC{q(Carp.pm)}) and Carp::Heavy $VERSION ($INC{q(Carp/Heavy.pm)}). Did you alter \@INC after Carp was loaded?\n";
10					}
11
12	1	5µs			1;
13
14					# Most of the machinery of Carp used to be here.
15					# It has been moved in Carp.pm now, but this placeholder remains for
16					# the benefit of modules that like to preload Carp::Heavy directly.
17					# This must load Carp, because some modules rely on the historical
18					# behaviour of Carp::Heavy loading Carp.