← Index
NYTProf Performance Profile   « block view • line view • sub view »
For /usr/share/koha/opac/cgi-bin/opac/opac-search.pl
  Run on Tue Oct 15 17:10:45 2013
Reported on Tue Oct 15 17:11:27 2013

Filename/usr/share/perl/5.10/subs.pm
StatementsExecuted 33 statements in 163µs
Subroutines
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
33399µs99µssubs::::importsubs::import
Call graph for these subroutines as a Graphviz dot language file.
Line State
ments
Time
on line
Calls Time
in subs
Code
1package subs;
2
31900nsour $VERSION = '1.00';
4
5=head1 NAME
6
- -
29150µsrequire 5.000;
30
31
# spent 99µs within subs::import which was called 3 times, avg 33µs/call: # once (45µs+0s) by Business::ISBN::BEGIN@61 at line 61 of Business/ISBN.pm # once (27µs+0s) by Business::ISBN10::BEGIN@9 at line 9 of Business/ISBN10.pm # once (26µs+0s) by Business::ISBN13::BEGIN@10 at line 10 of Business/ISBN13.pm
sub import {
3230108µs my $callpack = caller;
33 my $pack = shift;
34 my @imports = @_;
35 foreach $sym (@imports) {
36 *{"${callpack}::$sym"} = \&{"${callpack}::$sym"};
37 }
38};
39
4014µs1;