← Index
NYTProf Performance Profile   « line view »
For /usr/local/libexec/sympa/task_manager-debug.pl
  Run on Tue Jun 1 22:32:51 2021
Reported on Tue Jun 1 22:35:10 2021

Filename/usr/local/libexec/sympa/Sympa/Spindle/ProcessRequest.pm
StatementsExecuted 0 statements in 0s
Subroutines
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
0000s0sSympa::Spindle::ProcessRequest::::BEGIN@27Sympa::Spindle::ProcessRequest::BEGIN@27
0000s0sSympa::Spindle::ProcessRequest::::BEGIN@28Sympa::Spindle::ProcessRequest::BEGIN@28
0000s0sSympa::Spindle::ProcessRequest::::BEGIN@30Sympa::Spindle::ProcessRequest::BEGIN@30
0000s0sSympa::Spindle::ProcessRequest::::BEGIN@32Sympa::Spindle::ProcessRequest::BEGIN@32
0000s0sSympa::Spindle::ProcessRequest::::BEGIN@36Sympa::Spindle::ProcessRequest::BEGIN@36
0000s0sSympa::Spindle::ProcessRequest::::BEGIN@37Sympa::Spindle::ProcessRequest::BEGIN@37
0000s0sSympa::Spindle::ProcessRequest::::__ANON__Sympa::Spindle::ProcessRequest::__ANON__ (xsub)
0000s0sSympa::Spindle::ProcessRequest::::_twistSympa::Spindle::ProcessRequest::_twist
Call graph for these subroutines as a Graphviz dot language file.
Line State
ments
Time
on line
Calls Time
in subs
Code
1# -*- indent-tabs-mode: nil; -*-
2# vim:ft=perl:et:sw=4
3# $Id$
4
5# Sympa - SYsteme de Multi-Postage Automatique
6#
7# Copyright (c) 1997, 1998, 1999 Institut Pasteur & Christophe Wolfhugel
8# Copyright (c) 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005,
9# 2006, 2007, 2008, 2009, 2010, 2011 Comite Reseau des Universites
10# Copyright (c) 2011, 2012, 2013, 2014, 2015, 2016, 2017 GIP RENATER
11#
12# This program is free software; you can redistribute it and/or modify
13# it under the terms of the GNU General Public License as published by
14# the Free Software Foundation; either version 2 of the License, or
15# (at your option) any later version.
16#
17# This program is distributed in the hope that it will be useful,
18# but WITHOUT ANY WARRANTY; without even the implied warranty of
19# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
20# GNU General Public License for more details.
21#
22# You should have received a copy of the GNU General Public License
23# along with this program. If not, see <http://www.gnu.org/licenses/>.
24
25package Sympa::Spindle::ProcessRequest;
26
27use strict;
28use warnings;
29
30use Sympa::Log;
31
32use base qw(Sympa::Spindle);
33
34my $log = Sympa::Log->instance;
35
36use constant _distaff => 'Sympa::Request::Collection';
37use constant _on_skip => 1;
38
39sub _twist {
40 my $self = shift;
41 my $request = shift;
42
43 $log->syslog('notice', 'Processing %s', $request);
44
45 return ['Sympa::Spindle::AuthorizeRequest'];
46}
47
481;
49__END__