| Filename | /usr/share/koha/lib/C4/ClassSortRoutine/LCC.pm |
| Statements | Executed 22 statements in 703µs |
| Calls | P | F | Exclusive Time |
Inclusive Time |
Subroutine |
|---|---|---|---|---|---|
| 1 | 1 | 1 | 5.11ms | 46.4ms | C4::ClassSortRoutine::LCC::BEGIN@23 |
| 1 | 1 | 1 | 40µs | 286µs | C4::ClassSortRoutine::LCC::get_class_sort_key |
| 1 | 1 | 1 | 27µs | 35µs | C4::ClassSortRoutine::LCC::BEGIN@21 |
| 1 | 1 | 1 | 25µs | 91µs | C4::ClassSortRoutine::LCC::BEGIN@25 |
| 1 | 1 | 1 | 13µs | 27µs | C4::ClassSortRoutine::LCC::BEGIN@22 |
| Line | State ments |
Time on line |
Calls | Time in subs |
Code |
|---|---|---|---|---|---|
| 1 | package 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 | |||||
| 21 | 3 | 45µs | 2 | 43µs | # spent 35µs (27+8) within C4::ClassSortRoutine::LCC::BEGIN@21 which was called:
# once (27µs+8µs) by C4::ClassSource::BEGIN@25 at line 21 # spent 35µs making 1 call to C4::ClassSortRoutine::LCC::BEGIN@21
# spent 8µs making 1 call to strict::import |
| 22 | 3 | 31µs | 2 | 40µs | # spent 27µs (13+14) within C4::ClassSortRoutine::LCC::BEGIN@22 which was called:
# once (13µs+14µs) by C4::ClassSource::BEGIN@25 at line 22 # spent 27µs making 1 call to C4::ClassSortRoutine::LCC::BEGIN@22
# spent 14µs making 1 call to warnings::import |
| 23 | 3 | 229µs | 2 | 46.4ms | # spent 46.4ms (5.11+41.3) within C4::ClassSortRoutine::LCC::BEGIN@23 which was called:
# once (5.11ms+41.3ms) by C4::ClassSource::BEGIN@25 at line 23 # spent 46.4ms making 1 call to C4::ClassSortRoutine::LCC::BEGIN@23
# spent 8µs making 1 call to UNIVERSAL::import |
| 24 | |||||
| 25 | 3 | 358µs | 2 | 156µs | # spent 91µs (25+66) within C4::ClassSortRoutine::LCC::BEGIN@25 which was called:
# once (25µs+66µs) by C4::ClassSource::BEGIN@25 at line 25 # spent 91µs making 1 call to C4::ClassSortRoutine::LCC::BEGIN@25
# spent 66µs making 1 call to vars::import |
| 26 | |||||
| 27 | # set the version for version checking | ||||
| 28 | 1 | 3µs | $VERSION = 3.07.00.049; | ||
| 29 | |||||
| 30 | =head1 NAME | ||||
| 31 | |||||
| - - | |||||
| 50 | # spent 286µs (40+246) within C4::ClassSortRoutine::LCC::get_class_sort_key which was called:
# once (40µs+246µs) by C4::ClassSource::BEGIN@25 at line 1 of (eval 1018)[/usr/share/koha/lib/C4/ClassSortRoutine.pm:58] | ||||
| 51 | 1 | 2µs | my ($cn_class, $cn_item) = @_; | ||
| 52 | |||||
| 53 | 1 | 700ns | $cn_class = '' unless defined $cn_class; | ||
| 54 | 1 | 200ns | $cn_item = '' unless defined $cn_item; | ||
| 55 | 1 | 8µs | 1 | 37µs | my $call_number = Library::CallNumber::LC->new(uc "$cn_class $cn_item"); # spent 37µs making 1 call to Library::CallNumber::LC::new |
| 56 | 1 | 600ns | return '' unless defined $call_number; | ||
| 57 | 1 | 7µs | 1 | 209µs | my $key = $call_number->normalize(); # spent 209µs making 1 call to Library::CallNumber::LC::normalize |
| 58 | 1 | 700ns | $key = '' unless defined $key; | ||
| 59 | 1 | 12µs | return $key; | ||
| 60 | |||||
| 61 | } | ||||
| 62 | |||||
| 63 | 1 | 6µs | 1; | ||
| 64 | |||||
| 65 | =head1 AUTHOR | ||||
| 66 | |||||
| - - |