Filename | /home/mickey/git_tree/PONAPI/Server/lib/PONAPI/DAO/Request/UpdateRelationships.pm |
Statements | Executed 9 statements in 233µs |
Calls | P | F | Exclusive Time |
Inclusive Time |
Subroutine |
---|---|---|---|---|---|
1 | 1 | 1 | 18µs | 3.13ms | BEGIN@4 | PONAPI::DAO::Request::UpdateRelationships::
1 | 1 | 1 | 9µs | 94µs | BEGIN@35 | PONAPI::DAO::Request::UpdateRelationships::
0 | 0 | 0 | 0s | 0s | check_data_type_match | PONAPI::DAO::Request::UpdateRelationships::
0 | 0 | 0 | 0s | 0s | execute | PONAPI::DAO::Request::UpdateRelationships::
Line | State ments |
Time on line |
Calls | Time in subs |
Code |
---|---|---|---|---|---|
1 | # ABSTRACT: DAO request - update relationships | ||||
2 | package PONAPI::DAO::Request::UpdateRelationships; | ||||
3 | |||||
4 | 2 | 155µs | 2 | 6.24ms | # spent 3.13ms (18µs+3.11) within PONAPI::DAO::Request::UpdateRelationships::BEGIN@4 which was called:
# once (18µs+3.11ms) by PONAPI::DAO::BEGIN@13 at line 4 # spent 3.13ms making 1 call to PONAPI::DAO::Request::UpdateRelationships::BEGIN@4
# spent 3.11ms making 1 call to Moose::import |
5 | |||||
6 | 1 | 14µs | 1 | 621µs | extends 'PONAPI::DAO::Request'; # spent 621µs making 1 call to Moose::extends |
7 | |||||
8 | 1 | 4µs | 1 | 14.9ms | with 'PONAPI::DAO::Request::Role::UpdateLike', # spent 14.9ms making 1 call to Moose::with |
9 | 'PONAPI::DAO::Request::Role::HasDataMethods', | ||||
10 | 'PONAPI::DAO::Request::Role::HasID', | ||||
11 | 'PONAPI::DAO::Request::Role::HasRelationshipType'; | ||||
12 | |||||
13 | 1 | 3µs | 1 | 3.90ms | has data => ( # spent 3.90ms making 1 call to Moose::has |
14 | is => 'ro', | ||||
15 | isa => 'Maybe[HashRef|ArrayRef]', | ||||
16 | predicate => 'has_data', | ||||
17 | ); | ||||
18 | |||||
19 | sub check_data_type_match { 1 } # to avoid code duplications in HasDataMethods | ||||
20 | |||||
21 | sub execute { | ||||
22 | my $self = shift; | ||||
23 | if ( $self->is_valid ) { | ||||
24 | my @ret = $self->repository->update_relationships( %{ $self } ); | ||||
25 | |||||
26 | $self->_add_success_meta(@ret) | ||||
27 | if $self->_verify_update_response(@ret); | ||||
28 | } | ||||
29 | |||||
30 | return $self->response(); | ||||
31 | } | ||||
32 | |||||
33 | |||||
34 | 1 | 3µs | 2 | 11.0ms | __PACKAGE__->meta->make_immutable; # spent 11.0ms making 1 call to Class::MOP::Class::make_immutable
# spent 16µs making 1 call to PONAPI::DAO::Request::UpdateRelationships::meta |
35 | 3 | 54µs | 2 | 178µs | # spent 94µs (9+85) within PONAPI::DAO::Request::UpdateRelationships::BEGIN@35 which was called:
# once (9µs+85µs) by PONAPI::DAO::BEGIN@13 at line 35 # spent 94µs making 1 call to PONAPI::DAO::Request::UpdateRelationships::BEGIN@35
# spent 85µs making 1 call to Moose::unimport |
36 | |||||
37 | __END__ |