← Index
NYTProf Performance Profile   « block view • line view • sub view »
For xt/tapper-mcp-scheduler-with-db-longrun.t
  Run on Tue May 22 17:18:39 2012
Reported on Tue May 22 17:23:48 2012

Filename/2home/ss5/perl5/perlbrew/perls/perl-5.12.3/lib/site_perl/5.12.3/DBIx/Class/PK/Auto.pm
StatementsExecuted 10 statements in 67µs
Subroutines
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
11114µs83µsDBIx::Class::PK::Auto::::BEGIN@4DBIx::Class::PK::Auto::BEGIN@4
11110µs14µsDBIx::Class::PK::Auto::::BEGIN@5DBIx::Class::PK::Auto::BEGIN@5
1119µs27µsDBIx::Class::PK::Auto::::BEGIN@6DBIx::Class::PK::Auto::BEGIN@6
Call graph for these subroutines as a Graphviz dot language file.
Line State
ments
Time
on line
Calls Time
in subs
Code
1package DBIx::Class::PK::Auto;
2
3#use base qw/DBIx::Class::PK/;
4320µs2152µs
# spent 83µs (14+69) within DBIx::Class::PK::Auto::BEGIN@4 which was called: # once (14µs+69µs) by Class::C3::Componentised::ensure_class_loaded at line 4
use base qw/DBIx::Class/;
# spent 83µs making 1 call to DBIx::Class::PK::Auto::BEGIN@4 # spent 68µs making 1 call to base::import
5319µs219µs
# spent 14µs (10+5) within DBIx::Class::PK::Auto::BEGIN@5 which was called: # once (10µs+5µs) by Class::C3::Componentised::ensure_class_loaded at line 5
use strict;
# spent 14µs making 1 call to DBIx::Class::PK::Auto::BEGIN@5 # spent 5µs making 1 call to strict::import
6325µs245µs
# spent 27µs (9+18) within DBIx::Class::PK::Auto::BEGIN@6 which was called: # once (9µs+18µs) by Class::C3::Componentised::ensure_class_loaded at line 6
use warnings;
# spent 27µs making 1 call to DBIx::Class::PK::Auto::BEGIN@6 # spent 18µs making 1 call to warnings::import
7
812µs1;
9
10=head1 NAME
11
12DBIx::Class::PK::Auto - Automatic primary key class
13
14=head1 SYNOPSIS
15
16use base 'DBIx::Class::Core';
17__PACKAGE__->set_primary_key('id');
18
19=head1 DESCRIPTION
20
21This class overrides the insert method to get automatically incremented primary
22keys.
23
24PK::Auto is now part of Core.
25
26See L<DBIx::Class::Manual::Component> for details of component interactions.
27
28=head1 LOGIC
29
30C<PK::Auto> does this by letting the database assign the primary key field and
31fetching the assigned value afterwards.
32
33=head1 METHODS
34
35=head2 insert
36
37The code that was handled here is now in Row for efficiency.
38
39=head2 sequence
40
41The code that was handled here is now in ResultSource, and is being proxied to
42Row as well.
43
44=head1 AUTHORS
45
46Matt S. Trout <mst@shadowcatsystems.co.uk>
47
48=head1 LICENSE
49
50You may distribute this code under the same terms as Perl itself.
51
52=cut