← 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:06 2013

Filename/usr/share/koha/lib/C4/ClassSortRoutine/LCC.pm
StatementsExecuted 22 statements in 357µs
Subroutines
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
1113.02ms36.1msC4::ClassSortRoutine::LCC::::BEGIN@23C4::ClassSortRoutine::LCC::BEGIN@23
11124µs126µsC4::ClassSortRoutine::LCC::::get_class_sort_keyC4::ClassSortRoutine::LCC::get_class_sort_key
11116µs20µsC4::ClassSortRoutine::LCC::::BEGIN@21C4::ClassSortRoutine::LCC::BEGIN@21
11113µs51µsC4::ClassSortRoutine::LCC::::BEGIN@25C4::ClassSortRoutine::LCC::BEGIN@25
1119µs21µsC4::ClassSortRoutine::LCC::::BEGIN@22C4::ClassSortRoutine::LCC::BEGIN@22
Call graph for these subroutines as a Graphviz dot language file.
Line State
ments
Time
on line
Calls Time
in subs
Code
1package C4::ClassSortRoutine::LCC;
2
3# Copyright (C) 2007 LibLime
4# Copyright (C) 2012 Equinox Software, Inc.
5#
6# This file is part of Koha.
7#
8# Koha is free software; you can redistribute it and/or modify it under the
9# terms of the GNU General Public License as published by the Free Software
10# Foundation; either version 2 of the License, or (at your option) any later
11# version.
12#
13# Koha is distributed in the hope that it will be useful, but WITHOUT ANY
14# WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR
15# A PARTICULAR PURPOSE. See the GNU General Public License for more details.
16#
17# You should have received a copy of the GNU General Public License along
18# with Koha; if not, write to the Free Software Foundation, Inc.,
19# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
20
21328µs224µs
# spent 20µs (16+4) within C4::ClassSortRoutine::LCC::BEGIN@21 which was called: # once (16µs+4µs) by C4::ClassSource::BEGIN@25 at line 21
use strict;
# spent 20µs making 1 call to C4::ClassSortRoutine::LCC::BEGIN@21 # spent 4µs making 1 call to strict::import
22326µs232µs
# spent 21µs (9+12) within C4::ClassSortRoutine::LCC::BEGIN@22 which was called: # once (9µs+12µs) by C4::ClassSource::BEGIN@25 at line 22
use warnings;
# spent 21µs making 1 call to C4::ClassSortRoutine::LCC::BEGIN@22 # spent 12µs making 1 call to warnings::import
233143µs136.1ms
# spent 36.1ms (3.02+33.0) within C4::ClassSortRoutine::LCC::BEGIN@23 which was called: # once (3.02ms+33.0ms) by C4::ClassSource::BEGIN@25 at line 23
use Library::CallNumber::LC;
# spent 36.1ms making 1 call to C4::ClassSortRoutine::LCC::BEGIN@23
24
253140µs289µs
# spent 51µs (13+38) within C4::ClassSortRoutine::LCC::BEGIN@25 which was called: # once (13µs+38µs) by C4::ClassSource::BEGIN@25 at line 25
use vars qw($VERSION);
# spent 51µs making 1 call to C4::ClassSortRoutine::LCC::BEGIN@25 # spent 38µs making 1 call to vars::import
26
27# set the version for version checking
2812µs$VERSION = 3.07.00.049;
29
30=head1 NAME
31
- -
50
# spent 126µs (24+103) within C4::ClassSortRoutine::LCC::get_class_sort_key which was called: # once (24µs+103µs) by C4::ClassSource::BEGIN@25 at line 1 of (eval 1001)[/usr/share/koha/lib/C4/ClassSortRoutine.pm:58]
sub get_class_sort_key {
51815µs my ($cn_class, $cn_item) = @_;
52
53 $cn_class = '' unless defined $cn_class;
54 $cn_item = '' unless defined $cn_item;
55116µs my $call_number = Library::CallNumber::LC->new(uc "$cn_class $cn_item");
# spent 16µs making 1 call to Library::CallNumber::LC::new
56 return '' unless defined $call_number;
57187µs my $key = $call_number->normalize();
# spent 87µs making 1 call to Library::CallNumber::LC::normalize
58 $key = '' unless defined $key;
59 return $key;
60
61}
62
6314µs1;
64
65=head1 AUTHOR
66
- -