Profile of Log/Log4perl/Layout.pm

← 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:22:35 2012

Filename | /2home/ss5/perl5/perlbrew/perls/perl-5.12.3/lib/site_perl/5.12.3/Log/Log4perl/Layout.pm
Statements | Executed 10 statements in 330µs

Subroutines
Calls | P | F | Exclusive Time | Inclusive Time | Subroutine
--- | --- | --- | --- | --- | ---
1 | 1 | 1 | 2.11ms | 7.10ms | Log::Log4perl::Layout::::BEGIN@5Log::Log4perl::Layout::BEGIN@5
1 | 1 | 1 | 217µs | 418µs | Log::Log4perl::Layout::::BEGIN@4Log::Log4perl::Layout::BEGIN@4
1 | 1 | 1 | 161µs | 254µs | Log::Log4perl::Layout::::BEGIN@6Log::Log4perl::Layout::BEGIN@6
0 | 0 | 0 | 0s | 0s | Log::Log4perl::Layout::::appender_nameLog::Log4perl::Layout::appender_name
0 | 0 | 0 | 0s | 0s | Log::Log4perl::Layout::::defineLog::Log4perl::Layout::define
0 | 0 | 0 | 0s | 0s | Log::Log4perl::Layout::::renderLog::Log4perl::Layout::render

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

Line | State ments | Time on line | Calls | Time in subs | Code
--- | --- | --- | --- | --- | ---
1 |  |  |  |  | package Log::Log4perl::Layout;
2 |  |  |  |  |
3 |  |  |  |  |
4 | 3 | 76µs | 1 | 418µs | # spent 418µs (217+202) within Log::Log4perl::Layout::BEGIN@4 which was called: # once (217µs+202µs) by Log::Log4perl::Logger::BEGIN@11 at line 4 use Log::Log4perl::Layout::SimpleLayout; # spent 418µs making 1 call to Log::Log4perl::Layout::BEGIN@4
5 | 3 | 93µs | 1 | 7.10ms | # spent 7.10ms (2.11+4.98) within Log::Log4perl::Layout::BEGIN@5 which was called: # once (2.11ms+4.98ms) by Log::Log4perl::Logger::BEGIN@11 at line 5 use Log::Log4perl::Layout::PatternLayout; # spent 7.10ms making 1 call to Log::Log4perl::Layout::BEGIN@5
6 | 3 | 158µs | 1 | 254µs | # spent 254µs (161+93) within Log::Log4perl::Layout::BEGIN@6 which was called: # once (161µs+93µs) by Log::Log4perl::Logger::BEGIN@11 at line 6 use Log::Log4perl::Layout::PatternLayout::Multiline; # spent 254µs making 1 call to Log::Log4perl::Layout::BEGIN@6
7 |  |  |  |  |
8 |  |  |  |  |
9 |  |  |  |  | ####################################################
10 |  |  |  |  | sub appender_name {
11 |  |  |  |  | ####################################################
12 |  |  |  |  | my ($self, $arg) = @_;
13 |  |  |  |  |
14 |  |  |  |  | if ($arg) {
15 |  |  |  |  | die "setting appender_name unimplemented until it makes sense";
16 |  |  |  |  | }
17 |  |  |  |  | return $self->{appender_name};
18 |  |  |  |  | }
19 |  |  |  |  |
20 |  |  |  |  |
21 |  |  |  |  | ##################################################
22 |  |  |  |  | sub define {
23 |  |  |  |  | ##################################################
24 |  |  |  |  | ; #subclasses may implement
25 |  |  |  |  | }
26 |  |  |  |  |
27 |  |  |  |  |
28 |  |  |  |  | ##################################################
29 |  |  |  |  | sub render {
30 |  |  |  |  | ##################################################
31 |  |  |  |  | die "subclass must implement render";
32 |  |  |  |  | }
33 |  |  |  |  |
34 | 1 | 2µs |  |  | 1;
35 |  |  |  |  |
36 |  |  |  |  | __END__