← 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 11:58:52 2013
Reported on Tue Oct 15 12:01:07 2013

Filename/usr/share/perl/5.10/subs.pm
StatementsExecuted 33 statements in 171µs
Subroutines
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
333102µs102µ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
31600nsour $VERSION = '1.00';
4
5=head1 NAME
6
- -
29156µsrequire 5.000;
30
31
# spent 102µs within subs::import which was called 3 times, avg 34µs/call: # once (45µs+0s) by Business::ISBN::BEGIN@61 at line 61 of Business/ISBN.pm # once (29µs+0s) by Business::ISBN10::BEGIN@9 at line 9 of Business/ISBN10.pm # once (28µs+0s) by Business::ISBN13::BEGIN@10 at line 10 of Business/ISBN13.pm
sub import {
3230112µ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;