| Filename | /home/vagrant/kohaclone/errors/404.pl |
| Statements | Executed 0 statements in 0s |
| Calls | P | F | Exclusive Time |
Inclusive Time |
Subroutine |
|---|---|---|---|---|---|
| 1 | 1 | 1 | 18.2ms | 1.74s | CGI::Compile::ROOT::home_vagrant_kohaclone_errors_404_2epl::BEGIN@22 |
| 1 | 1 | 1 | 1.61ms | 1.90ms | CGI::Compile::ROOT::home_vagrant_kohaclone_errors_404_2epl::BEGIN@23 |
| 3 | 1 | 1 | 40µs | 40µs | CGI::Compile::ROOT::home_vagrant_kohaclone_errors_404_2epl::CORE:open (opcode) |
| 1 | 1 | 1 | 19µs | 73µs | CGI::Compile::ROOT::home_vagrant_kohaclone_errors_404_2epl::BEGIN@21 |
| 1 | 1 | 1 | 18µs | 33µs | CGI::Compile::ROOT::home_vagrant_kohaclone_errors_404_2epl::BEGIN@19 |
| 3 | 1 | 1 | 17µs | 17µs | CGI::Compile::ROOT::home_vagrant_kohaclone_errors_404_2epl::CORE:pack (opcode) |
| 1 | 1 | 1 | 12µs | 20µs | CGI::Compile::ROOT::home_vagrant_kohaclone_errors_404_2epl::BEGIN@20 |
| 1 | 1 | 1 | 11µs | 12µs | CGI::Compile::ROOT::home_vagrant_kohaclone_errors_404_2epl::BEGIN@24 |
| 3 | 1 | 1 | 8µs | 8µs | CGI::Compile::ROOT::home_vagrant_kohaclone_errors_404_2epl::CORE:unpack (opcode) |
| 0 | 0 | 0 | 0s | 0s | CGI::Compile::ROOT::home_vagrant_kohaclone_errors_404_2epl::__ANON__[:58] |
| Line | State ments |
Time on line |
Calls | Time in subs |
Code |
|---|---|---|---|---|---|
| 1 | #!/usr/bin/perl | ||||
| 2 | 9 | 61µs | # spent 43µs making 3 calls to Template::Provider::DESTROY, avg 14µs/call
# spent 14µs making 3 calls to Template::Context::DESTROY, avg 5µs/call
# spent 4µs making 3 calls to Template::Stash::XS::DESTROY, avg 1µs/call | ||
| 3 | # This file is part of Koha. | ||||
| 4 | # | ||||
| 5 | # Koha is free software; you can redistribute it and/or modify it under the | ||||
| 6 | # terms of the GNU General Public License as published by the Free Software | ||||
| 7 | # Foundation; either version 2 of the License, or (at your option) any later | ||||
| 8 | # version. | ||||
| 9 | # | ||||
| 10 | # Koha is distributed in the hope that it will be useful, but WITHOUT ANY | ||||
| 11 | # WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR | ||||
| 12 | # A PARTICULAR PURPOSE. See the GNU General Public License for more details. | ||||
| 13 | # | ||||
| 14 | # You should have received a copy of the GNU General Public License along with | ||||
| 15 | # Koha; if not, write to the Free Software Foundation, Inc., | ||||
| 16 | # 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA | ||||
| 17 | |||||
| 18 | |||||
| 19 | 2 | 48µs | # spent 33µs (18+15) within CGI::Compile::ROOT::home_vagrant_kohaclone_errors_404_2epl::BEGIN@19 which was called:
# once (18µs+15µs) by CGI::Compile::_eval at line 19 # spent 33µs making 1 call to CGI::Compile::ROOT::home_vagrant_kohaclone_errors_404_2epl::BEGIN@19
# spent 15µs making 1 call to strict::import | ||
| 20 | 2 | 29µs | # spent 20µs (12+9) within CGI::Compile::ROOT::home_vagrant_kohaclone_errors_404_2epl::BEGIN@20 which was called:
# once (12µs+9µs) by CGI::Compile::_eval at line 20 # spent 20µs making 1 call to CGI::Compile::ROOT::home_vagrant_kohaclone_errors_404_2epl::BEGIN@20
# spent 9µs making 1 call to warnings::import | ||
| 21 | 2 | 128µs | # spent 73µs (19+55) within CGI::Compile::ROOT::home_vagrant_kohaclone_errors_404_2epl::BEGIN@21 which was called:
# once (19µs+55µs) by CGI::Compile::_eval at line 21 # spent 73µs making 1 call to CGI::Compile::ROOT::home_vagrant_kohaclone_errors_404_2epl::BEGIN@21
# spent 55µs making 1 call to CGI::import | ||
| 22 | 2 | 1.74s | # spent 1.74s (18.2ms+1.73) within CGI::Compile::ROOT::home_vagrant_kohaclone_errors_404_2epl::BEGIN@22 which was called:
# once (18.2ms+1.73s) by CGI::Compile::_eval at line 22 # spent 1.74s making 1 call to CGI::Compile::ROOT::home_vagrant_kohaclone_errors_404_2epl::BEGIN@22
# spent 103µs making 1 call to Exporter::import | ||
| 23 | 2 | 1.99ms | # spent 1.90ms (1.61+292µs) within CGI::Compile::ROOT::home_vagrant_kohaclone_errors_404_2epl::BEGIN@23 which was called:
# once (1.61ms+292µs) by CGI::Compile::_eval at line 23 # spent 1.90ms making 1 call to CGI::Compile::ROOT::home_vagrant_kohaclone_errors_404_2epl::BEGIN@23
# spent 89µs making 1 call to Exporter::import | ||
| 24 | 2 | 14µs | # spent 12µs (11+1) within CGI::Compile::ROOT::home_vagrant_kohaclone_errors_404_2epl::BEGIN@24 which was called:
# once (11µs+1µs) by CGI::Compile::_eval at line 24 # spent 12µs making 1 call to CGI::Compile::ROOT::home_vagrant_kohaclone_errors_404_2epl::BEGIN@24
# spent 1µs making 1 call to C4::Context::import | ||
| 25 | |||||
| 26 | 3 | 3.09ms | my $query = CGI->new; # spent 3.09ms making 3 calls to Plack::Sandbox::_2fetc_2fkoha_2fsites_2fkohadev_2fplack_2epsgi::__ANON__, avg 1.03ms/call | ||
| 27 | 3 | 33.8ms | my $admin = C4::Context->preference('KohaAdminEmailAddress'); # spent 33.8ms making 3 calls to C4::Context::preference, avg 11.3ms/call | ||
| 28 | 3 | 1.09s | my ( $template, $loggedinuser, $cookie ) = get_template_and_user( # spent 1.09s making 3 calls to C4::Auth::get_template_and_user, avg 362ms/call | ||
| 29 | { | ||||
| 30 | template_name => 'errors/404.tt', | ||||
| 31 | query => $query, | ||||
| 32 | type => 'intranet', | ||||
| 33 | authnotrequired => 1, | ||||
| 34 | debug => 1, | ||||
| 35 | } | ||||
| 36 | ); | ||||
| 37 | 3 | 22µs | $template->param( admin => $admin ); # spent 22µs making 3 calls to C4::Templates::param, avg 7µs/call | ||
| 38 | 6 | 447ms | output_with_http_headers $query, $cookie, $template->output, 'html', '404 Not Found'; # spent 443ms making 3 calls to C4::Templates::output, avg 148ms/call
# spent 3.94ms making 3 calls to C4::Output::output_with_http_headers, avg 1.31ms/call | ||
| 39 | |||||
| 40 | }; | ||||
| 41 | my $self = shift; | ||||
| 42 | 6 | 25µs | my $exit_val = unpack('C', pack('C', sprintf('%.0f', $rv))); # spent 17µs making 3 calls to CGI::Compile::ROOT::home_vagrant_kohaclone_errors_404_2epl::CORE:pack, avg 6µs/call
# spent 8µs making 3 calls to CGI::Compile::ROOT::home_vagrant_kohaclone_errors_404_2epl::CORE:unpack, avg 3µs/call | ||
| 43 | if ($@) { | ||||
| 44 | die $@ unless ( | ||||
| 45 | ref($@) eq 'ARRAY' and | ||||
| 46 | $@->[0] eq "EXIT\n" | ||||
| 47 | ); | ||||
| 48 | my $exit_param = unpack('C', pack('C', sprintf('%.0f', $@->[1]))); | ||||
| 49 | |||||
| 50 | if ($exit_param != 0 && !$CGI::Compile::RETURN_EXIT_VAL && !$self->{return_exit_val}) { | ||||
| 51 | die "exited nonzero: $exit_param"; | ||||
| 52 | } | ||||
| 53 | |||||
| 54 | $exit_val = $exit_param; | ||||
| 55 | } | ||||
| 56 | |||||
| 57 | return $exit_val; | ||||
| 58 | }; | ||||
# spent 40µs within CGI::Compile::ROOT::home_vagrant_kohaclone_errors_404_2epl::CORE:open which was called 3 times, avg 13µs/call:
# 3 times (40µs+0s) by CGI::Compile::ROOT::home_vagrant_kohaclone_errors_404_2epl::__ANON__[/home/vagrant/kohaclone/errors/404.pl:58] at line 2 of (eval 163)[CGI/Compile.pm:12], avg 13µs/call | |||||
# spent 17µs within CGI::Compile::ROOT::home_vagrant_kohaclone_errors_404_2epl::CORE:pack which was called 3 times, avg 6µs/call:
# 3 times (17µs+0s) by CGI::Compile::ROOT::home_vagrant_kohaclone_errors_404_2epl::__ANON__[/home/vagrant/kohaclone/errors/404.pl:58] at line 42, avg 6µs/call | |||||
# spent 8µs within CGI::Compile::ROOT::home_vagrant_kohaclone_errors_404_2epl::CORE:unpack which was called 3 times, avg 3µs/call:
# 3 times (8µs+0s) by CGI::Compile::ROOT::home_vagrant_kohaclone_errors_404_2epl::__ANON__[/home/vagrant/kohaclone/errors/404.pl:58] at line 42, avg 3µs/call |