Windows NT KAMIDAKI 10.0 build 19045 (Windows 10) AMD64
Apache/2.4.58 (Win64) OpenSSL/3.1.3 PHP/8.3.9
Server IP : 192.168.3.16 & Your IP : 216.73.216.140
Domains :
Cant Read [ /etc/named.conf ]
User : SISTEMA
Terminal
Auto Root
Create File
Create Folder
Localroot Suggester
Backdoor Destroyer
Readme
C: /
xampp /
perl /
vendor /
lib /
Log /
Report /
Dispatcher /
Delete
Unzip
Name
Size
Permission
Date
Action
Callback.pm
912
B
-rw-rw-rw-
2021-01-15 17:36
Callback.pod
4.73
KB
-rw-rw-rw-
2021-01-15 17:36
File.pm
4.24
KB
-rw-rw-rw-
2021-01-15 17:36
File.pod
7.2
KB
-rw-rw-rw-
2021-01-15 17:36
Log4perl.pm
2.73
KB
-rw-rw-rw-
2021-01-15 17:36
Log4perl.pod
6.94
KB
-rw-rw-rw-
2021-01-15 17:36
LogDispatch.pm
2.13
KB
-rw-rw-rw-
2021-01-15 17:36
LogDispatch.pod
5.8
KB
-rw-rw-rw-
2021-01-15 17:36
Perl.pm
786
B
-rw-rw-rw-
2021-01-15 17:36
Perl.pod
1.45
KB
-rw-rw-rw-
2021-01-15 17:36
Syslog.pm
3.28
KB
-rw-rw-rw-
2021-01-15 17:36
Syslog.pod
6.78
KB
-rw-rw-rw-
2021-01-15 17:36
Try.pm
2.89
KB
-rw-rw-rw-
2021-01-15 17:36
Try.pod
9.68
KB
-rw-rw-rw-
2021-01-15 17:36
Save
Rename
# Copyrights 2007-2021 by [Mark Overmeer <markov@cpan.org>]. # For other contributors see ChangeLog. # See the manual pages for details on the licensing terms. # Pod stripped from pm file by OODoc 2.02. # This code is part of distribution Log-Report. Meta-POD processed with # OODoc into POD and HTML manual-pages. See README.md # Copyright Mark Overmeer. Licensed under the same terms as Perl itself. package Log::Report::Dispatcher::Callback; use vars '$VERSION'; $VERSION = '1.31'; use base 'Log::Report::Dispatcher'; use warnings; use strict; use Log::Report 'log-report'; sub init($) { my ($self, $args) = @_; $self->SUPER::init($args); $self->{callback} = $args->{callback} or error __x"dispatcher {name} needs a 'callback'", name => $self->name; $self; } sub callback() {shift->{callback}} sub log($$$$) { my $self = shift; $self->{callback}->($self, @_); } 1;