Profile of DBIx/Class.pm

Filename	/usr/share/perl5/DBIx/Class.pm
Statements	Executed 0 statements in 0s

Subroutines
Calls	P	F	Exclusive Time	Inclusive Time	Subroutine
184	1	1	2.41ms	34.1ms	DBIx::Class::::mk_classaccessorDBIx::Class::mk_classaccessor
1	1	1	2.39ms	2.43ms	DBIx::Class::::BEGIN@21DBIx::Class::BEGIN@21
1	1	1	2.05ms	30.2ms	DBIx::Class::::BEGIN@18DBIx::Class::BEGIN@18
184	11	3	1.61ms	35.7ms	DBIx::Class::::mk_classdataDBIx::Class::mk_classdata
1	1	1	416µs	511µs	DBIx::Class::::BEGIN@25DBIx::Class::BEGIN@25
1	1	1	163µs	201µs	DBIx::Class::::BEGIN@24DBIx::Class::BEGIN@24
1	1	1	22µs	34µs	DBIx::Class::::BEGIN@3DBIx::Class::BEGIN@3
1	1	1	14µs	29.4ms	DBIx::Class::::BEGIN@23DBIx::Class::BEGIN@23
1	1	1	11µs	16µs	DBIx::Class::::BEGIN@19DBIx::Class::BEGIN@19
1	1	1	10µs	19µs	DBIx::Class::::BEGIN@4DBIx::Class::BEGIN@4
11	1	1	10µs	10µs	DBIx::Class::::component_base_classDBIx::Class::component_base_class
1	1	1	3µs	3µs	DBIx::Class::::CORE:matchDBIx::Class::CORE:match (opcode)
0	0	0	0s	0s	DBIx::Class::::MODIFY_CODE_ATTRIBUTESDBIx::Class::MODIFY_CODE_ATTRIBUTES
0	0	0	0s	0s	DBIx::Class::::_attr_cacheDBIx::Class::_attr_cache

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

Line	Calls	Time in subs	Code
1			package DBIx::Class;
2
3	2	47µs	# spent 34µs (22+13) within DBIx::Class::BEGIN@3 which was called: # once (22µs+13µs) by base::import at line 3 use strict; # spent 34µs making 1 call to DBIx::Class::BEGIN@3 # spent 13µs making 1 call to strict::import
4	2	27µs	# spent 19µs (10+9) within DBIx::Class::BEGIN@4 which was called: # once (10µs+9µs) by base::import at line 4 use warnings; # spent 19µs making 1 call to DBIx::Class::BEGIN@4 # spent 9µs making 1 call to warnings::import
5
6			our $VERSION;
7			# Always remember to do all digits for the version even if they're 0
8			# i.e. first release of 0.XX must be 0.XX000. This avoids fBSD ports
9			# brain damage and presumably various other packaging systems too
10
11			# $VERSION declaration must stay up here, ahead of any other package
12			# declarations, as to not confuse various modules attempting to determine
13			# this ones version, whether that be s.c.o. or Module::Metadata, etc
14			$VERSION = '0.082810';
15
16	1	3µs	$VERSION = eval $VERSION if $VERSION =~ /_/; # numify for warning-free dev releases # spent 3µs making 1 call to DBIx::Class::CORE:match
17
18	2	30.2ms	# spent 30.2ms (2.05+28.2) within DBIx::Class::BEGIN@18 which was called: # once (2.05ms+28.2ms) by base::import at line 18 use DBIx::Class::_Util; # spent 30.2ms making 1 call to DBIx::Class::BEGIN@18 # spent 17µs making 1 call to Exporter::import
19	2	21µs	# spent 16µs (11+5) within DBIx::Class::BEGIN@19 which was called: # once (11µs+5µs) by base::import at line 19 use mro 'c3'; # spent 16µs making 1 call to DBIx::Class::BEGIN@19 # spent 5µs making 1 call to mro::import
20
21	1	2.43ms	# spent 2.43ms (2.39+43µs) within DBIx::Class::BEGIN@21 which was called: # once (2.39ms+43µs) by base::import at line 21 use DBIx::Class::Optional::Dependencies; # spent 2.43ms making 1 call to DBIx::Class::BEGIN@21
22
23	2	29.4ms	# spent 29.4ms (14µs+29.4) within DBIx::Class::BEGIN@23 which was called: # once (14µs+29.4ms) by base::import at line 23 use base qw/DBIx::Class::Componentised DBIx::Class::AccessorGroup/; # spent 29.4ms making 1 call to DBIx::Class::BEGIN@23 # spent 29.4ms making 1 call to base::import, recursion: max depth 2, sum of overlapping time 29.4ms
24	1	201µs	# spent 201µs (163+39) within DBIx::Class::BEGIN@24 which was called: # once (163µs+39µs) by base::import at line 24 use DBIx::Class::StartupCheck; # spent 201µs making 1 call to DBIx::Class::BEGIN@24
25	1	511µs	# spent 511µs (416+95) within DBIx::Class::BEGIN@25 which was called: # once (416µs+95µs) by base::import at line 25 use DBIx::Class::Exception; # spent 511µs making 1 call to DBIx::Class::BEGIN@25
26
27	1	413µs	__PACKAGE__->mk_group_accessors(inherited => '_skip_namespace_frames'); # spent 413µs making 1 call to Class::Accessor::Grouped::mk_group_accessors
28	1	14µs	__PACKAGE__->_skip_namespace_frames('^DBIx::Class\|^SQL::Abstract\|^Try::Tiny\|^Class::Accessor::Grouped\|^Context::Preserve'); # spent 14µs making 1 call to DBIx::Class::_skip_namespace_frames
29
30			# spent 35.7ms (1.61+34.1) within DBIx::Class::mk_classdata which was called 184 times, avg 194µs/call: # 174 times (1.56ms+23.3ms) by DBIx::Class::ResultSourceProxy::Table::table at line 99 of DBIx/Class/ResultSourceProxy/Table.pm, avg 143µs/call # once (8µs+7.88ms) by base::import at line 15 of DBIx/Class/Schema.pm # once (7µs+526µs) by Class::C3::Componentised::ensure_class_loaded at line 12 of DBIx/Class/ResultSourceProxy/Table.pm # once (4µs+399µs) by base::import at line 16 of DBIx/Class/Schema.pm # once (3µs+326µs) by Class::C3::Componentised::ensure_class_loaded at line 14 of DBIx/Class/ResultSourceProxy/Table.pm # once (6µs+311µs) by Class::C3::Componentised::ensure_class_loaded at line 33 of DBIx/Class/ResultSource.pm # once (3µs+297µs) by base::import at line 17 of DBIx/Class/Schema.pm # once (3µs+278µs) by base::import at line 20 of DBIx/Class/Schema.pm # once (3µs+271µs) by base::import at line 21 of DBIx/Class/Schema.pm # once (3µs+270µs) by base::import at line 19 of DBIx/Class/Schema.pm # once (3µs+268µs) by base::import at line 18 of DBIx/Class/Schema.pm sub mk_classdata {
31	184	34.1ms	shift->mk_classaccessor(@_); # spent 34.1ms making 184 calls to DBIx::Class::mk_classaccessor, avg 185µs/call
32			}
33
34			# spent 34.1ms (2.41+31.7) within DBIx::Class::mk_classaccessor which was called 184 times, avg 185µs/call: # 184 times (2.41ms+31.7ms) by DBIx::Class::mk_classdata at line 31, avg 185µs/call sub mk_classaccessor {
35			my $self = shift;
36	184	31.6ms	$self->mk_group_accessors('inherited', $_[0]); # spent 31.6ms making 184 calls to Class::Accessor::Grouped::mk_group_accessors, avg 172µs/call
37	7	31µs	$self->set_inherited(@_) if @_ > 1; # spent 31µs making 7 calls to Class::Accessor::Grouped::set_inherited, avg 4µs/call
38			}
39
40			# spent 10µs within DBIx::Class::component_base_class which was called 11 times, avg 891ns/call: # 11 times (10µs+0s) by Class::C3::Componentised::load_components at line 71 of Class/C3/Componentised.pm, avg 891ns/call sub component_base_class { 'DBIx::Class' }
41
42			sub MODIFY_CODE_ATTRIBUTES {
43			my ($class,$code,@attrs) = @_;
44			$class->mk_classdata('__attr_cache' => {})
45			unless $class->can('__attr_cache');
46			$class->__attr_cache->{$code} = [@attrs];
47			return ();
48			}
49
50			sub _attr_cache {
51			my $self = shift;
52			my $cache = $self->can('__attr_cache') ? $self->__attr_cache : {};
53
54			return {
55			%$cache,
56			%{ $self->maybe::next::method \|\| {} },
57			};
58			}
59
60			# DO NOT change this URL nor the identically named =head1 below
61			# it is linked throughout the ecosystem
62			sub DBIx::Class::_ENV_::HELP_URL () {
63			'http://p3rl.org/DBIx::Class#GETTING_HELP/SUPPORT'
64			}
65
66			1;
67
68			__END__

			# spent 3µs within DBIx::Class::CORE:match which was called: # once (3µs+0s) by base::import at line 16 sub DBIx::Class::CORE:match; # opcode