将Log::Log4perl与MCE (多核引擎) Perl配合使用
Log::Log4perl是一个Perl模块，用于实现灵活的日志记录功能。它提供了多种日志级别、日志格式化选项和输出目标，可以帮助开发人员在应用程序中实现高效的日志记录。
MCE (多核引擎) Perl是一个用于多核编程的Perl模块。它提供了一种简单而强大的方式来利用多核处理器的并行计算能力，从而提高程序的性能和效率。
将Log::Log4perl与MCE Perl配合使用可以实现在多核环境下进行并行日志记录的功能。通过将日志记录任务分配给不同的核心进行处理，可以提高日志记录的效率和吞吐量。
优势：
- 高效性：通过并行处理日志记录任务，可以充分利用多核处理器的计算能力，提高日志记录的效率和吞吐量。
- 灵活性：Log::Log4perl提供了丰富的配置选项和输出目标，可以根据需求自定义日志记录的格式和目标。
- 可扩展性：MCE Perl支持动态添加和删除核心，可以根据实际需求进行灵活的扩展和缩减。
应用场景：
- 大规模系统：在大规模系统中，日志记录是非常重要的，通过将Log::Log4perl与MCE Perl配合使用，可以提高日志记录的效率，减少对系统性能的影响。
- 并行计算：在并行计算任务中，日志记录通常是一个瓶颈，通过并行处理日志记录任务，可以提高整个计算任务的效率。
推荐的腾讯云相关产品： 腾讯云提供了丰富的云计算产品和服务，以下是一些与日志记录和多核计算相关的产品和服务：
- 云服务器（ECS）：提供了高性能的云服务器实例，可以用于部署和运行应用程序。
- 云监控（Cloud Monitor）：提供了全面的监控和告警功能，可以监控服务器的性能和日志记录情况。
- 弹性伸缩（Auto Scaling）：提供了自动伸缩的能力，可以根据实际需求自动调整服务器的数量和规模。
- 云函数（SCF）：提供了无服务器计算的能力，可以根据事件触发执行代码，适用于处理日志记录任务。
- 云存储（COS）：提供了高可靠性和可扩展性的对象存储服务，可以用于存储和管理日志文件。
更多关于腾讯云产品的详细介绍和文档可以参考腾讯云官方网站：https://cloud.tencent.com/
相关·内容
我正在为我的一个项目使用MCE进行并行处理。我在记录MCE的输出时遇到了问题(为了记录，我使用了Log4perl)。 我浏览了提供的示例，发现它们打印到STDOUT/STDERR或当时提供的一些日志文件中。有MCE->sendto()和MCE->print()选项可用，但我不确定如何在log4perl中使用它。 package ABC;
use strict;
use warnings;
use MCE;
sub new {
my $class = shift;
my ($self) = {@_};
return bless $self, $class;
浏览 29提问于2019-04-29得票数 2
回答已采纳
我试图设置两个附加器，但它似乎只写入STDERR：
my $header = "######$scriptname $version";
use Log::Log4perl qw(:easy);
Log::Log4perl->easy_init($DEBUG);
my $logger = get_logger();
my $layout = Log::Log4perl::Layout::PatternLayout->new(
"%d %p> %F{1}:%L %M - %m%n");
my $appender = Log::Log4perl::
浏览 0提问于2011-09-09得票数 3
回答已采纳
好的-所以我有一个模块和一个调用它的脚本，它们都实现了Log4perl。这是一个MWE：
test.plx：
#!/usr/bin/perl -w
use strict;
my $logger;
BEGIN {
eval { require Log::Log4perl; };
if($@) {
print "Log::Log4perl not installed - stubbing.\n";
no strict qw(refs);
*{__PACKAGE__."::$_"} = sub { } for qw(TRACE
浏览 1提问于2017-05-25得票数 0
在 for Log4perl中，将解释如何编写配置文件以使用单独的文件来处理错误和信息。
这对于一个脚本很好，或者如果你想将几个脚本错误和信息混合到同一个错误和信息日志中。
问题
我非常希望每个脚本都有自己的错误和信息文件，而且我仍然能够使用
$logger->info()
$logger->error()
我把log.conf写对了吗？
我应该如何在每个脚本中启动Log4perl？
account.pl
use Log::Log4perl;
Log::Log4perl::init('log.conf');
my $logger = Log::Log4perl-&g
浏览 3提问于2011-07-07得票数 2
回答已采纳
我尝试使用App::Fatpacker模块(在运行Perl 5.20的CentOS 6.6 64位上)使用fatpack实用程序来填充我的Perl脚本。我的脚本使用Log::Log4perl模块进行日志记录。fatpack实用程序抱怨日志模块：
fatpack trace collect_genomes_to_database.pl
collect_genomes_to_database.pl syntax OK
fatpack packlists-for `cat fatpacker.trace` >packlists
Can't locate object method &#
浏览 2提问于2015-07-09得票数 3
回答已采纳
我有一个带有两个附加程序的记录器(一个屏幕和其他文件)。我希望有一个可以更改的可变日志级别的屏幕附录，以及无论发生什么事情都会记录所有内容的文件附录。因此，例如，您可以禁用屏幕上的任何输出(屏幕附录)，但完全记录到日志文件(File )中的跟踪级别。我成功地更改了屏幕附录程序，但无法将同一记录器的File设置为跟踪级别。我尝试使用不同的阈值设置，但没有成功。
# Define a category logger
my $log = Log::Log4perl->get_logger("main");
# Define a layout
my $layout = Log:
浏览 0提问于2015-10-23得票数 3
回答已采纳
是一个很好的日志记录工具。
杂注也是一个必不可少的工具。
但是，当Perl脚本作为守护进程运行时，Perl警告会打印到STDERR中，没有人能看到它们，而不是打印到相关程序的Log4perl日志文件中。
有没有办法在Log4perl日志中捕获Perl警告？
例如，下面的代码可以很好地记录到日志文件中，但是如果它作为守护进程运行，Perl警告将不会包含在日志中：
#!/usr/bin/env perl
use strict;
use warnings;
use Log::Log4perl qw(get_logger);
# Define configuration
my $conf = q(
浏览 0提问于2010-01-18得票数 13
回答已采纳
我一直在试图弄清楚我是否可以在运行时更改我通过配置文件定义的一个appender的过滤器。
log4perl.filter.M1 = Log::Log4perl::Filter::LevelMatch
log4perl.filter.M2 = Log::Log4perl::Filter::LevelMatch
log4perl.filter.M1.LevelToMatch = INFO
log4perl.filter.M1.AcceptOnMatch = true
log4perl.filter.M2.LevelToMatch = W
浏览 5提问于2014-01-31得票数 5
回答已采纳
我有日志：：Log4perl配置，有两个附加程序要文件和屏幕，如下所示：
log4perl.logger.bc_log = INFO, bc_log, console
log4perl.appender.bc_log = Log::Log4perl::Appender::File
log4perl.appender.bc_log.filename = bc.log
log4perl.appender.bc_log.layout = Log::Log4perl::Layout::PatternLayout
log4perl.
浏览 3提问于2018-04-17得票数 0
我有一个Perl程序，在这个程序中，我必须将一组消息转到屏幕(stdout)，另一组消息转到文件中。我为每个输出创建两个记录器:首先是屏幕记录器，然后是文件记录器。当我创建屏幕记录器并使用它时，消息确实会出现在屏幕上。创建文件记录器后，使用屏幕记录器打印的消息将不再出现在屏幕上。但是，在使用文件记录器时，消息确实会出现在文件中。
日志：：Log4Perl为记录器配置如下：
# Screen configuration:
my $screen_conf = q(
log4perl.logger.MyPackage = DEBUG, Screen
浏览 6提问于2014-09-12得票数 1
回答已采纳
我有一个使用Log4perl进行日志记录的mojolicious应用程序。它是一个多用户应用程序，当多个用户访问该应用程序时，有时很难跟踪日志文件中的各种线程。我想要做的是将每个用户(人口低于25个用户)的活动记录到一个单独的文件中。例如/log/userX.log./log/userY.log等。
我想过在配置文件中使用类似的东西: log4perl.appender.MAIN.filename=sub { return get_user_filename()；}但是记录器是在Mojolicious启动子例程中定义的，用户直到请求时才知道。
另一个似乎更有希望的想法是编写一个桥路由，为用户创
浏览 7提问于2013-08-22得票数 2
当我没有将任何内容推送到日志：：Log4perl：：NDC堆栈时，%x将返回[undef]。当堆栈为空时，我希望它返回一个空字符串。
例如，以以下代码为例：
use strict;
use Log::Log4perl qw(:easy);
Log::Log4perl->easy_init({ level => $INFO, layout => "%x %m%n" });
Log::Log4perl->get_logger()->info("first message");
Log::Log4perl::NDC->push(&#
浏览 0提问于2013-09-17得票数 2
回答已采纳
我想将一些结果记录到一个文件中，而不会干扰我的日志的水平。用Log::Log4perl可以做到这一点吗？我尝试过跟踪文档，但是我只发现它取决于日志级别来插入一个文件？与一样：
og::Log4perl->easy_init( { level => $DEBUG,
file => ">>test.log",
layout => '%F{1}-%L-%M: %m%n' },
浏览 6提问于2020-08-13得票数 2
回答已采纳
2回答
虽然我没有看到任何同名但用不同情况的模块，但出于好奇，我试图安装，在安装过程中，我错误地拼写了'Perl‘而不是'perl'：
% cpan -i Log::Log4Perl
Cannot install Log::Log4Perl, don't know what it is.
当我使用正确的名字时，一切都进行得很顺利：
% cpan -i Log::Log4perl
相同的名称，但不同的情况会造成冲突。这背后有什么具体原因吗？
浏览 1提问于2013-10-22得票数 3
回答已采纳
我正在使用Perl/Mojolicious和JQuery构建一个服务器-客户端应用程序。服务器使用Log::Log4perl生成日志文件，并将日志文件名发送回客户端，以便客户端可以看到进度。在客户端，我使用常规的HTML A链接到日志文件，如下所示：
<a href="logs/blabla.log">See log file</a>
问题是，我点击了客户端的“查看日志文件”，浏览器显示文件正在加载并被卡住，直到服务器完成对文件的写入--就在那时我可以看到文件的内容。
我将Log::Log4perl配置为自动刷新，并尝试使用'log4perl.a
浏览 4提问于2013-12-05得票数 1
有没有办法使用创建一个智能的自记录模块，即使在没有未初始化Log4perl的调用脚本的情况下，也能将其操作记录到一个文件中？据我从文档中可以看出，使用Log4perl的唯一方法是通过配置在运行脚本中对其进行初始化，然后实现Log4perl调用的模块根据调用者的Log4perl配置记录自己。
相反，我希望模块为Log4perl提供默认的初始化配置。这将为模块的类别提供默认的文件附加器。然后，如果需要，我可以通过在调用者中用不同的配置初始化Log4perl来覆盖此行为，希望一切都能正常工作。
这种防御性日志记录行为是否可行，或者我是否需要依赖于在调用我想要记录的模块的每个.pl脚本中初始化Log4
浏览 0提问于2010-06-11得票数 8
回答已采纳
2回答
我想限制使用log4perl创建的日志文件的大小。我不希望我的日志文件超过100mb；我只需要最后100mb (或大约100MB)的数据。理想情况下，它会截断较早的数据，只保留最后一位。我知道Log::Dispatch::FileRotate模块，但它不能完全满足我的需求，因为我不想要多个日志文件。
这个是可能的吗？
完整代码，包括内联配置，如下所示(减去use语句)：
my $log_conf = q/
log4perl.category = DEBUG, Logfile
log4perl.appender.Logfile = Log::Dispatch::FileRota
浏览 4提问于2012-07-25得票数 3
如果一个特定的模块使用log4perl进行日志记录，那么有没有办法在内部使用log4perl获取该模块的名称。或者消息是从srcipt(.pl)记录下来的，除了使用caller或任何不显式使用log4perl函数的函数之外，我们还可以使用log4perl来获得脚本的名称吗？
浏览 4提问于2017-04-18得票数 0
1回答
我是Log4perl的新手，我正在努力弄清楚为什么在下面的设置中我会有两个不同的记录器。我的理解是，这应该是一个单例，每次调用get_logger()都会返回相同的对象实例。
Test.pm
#!/usr/bin/perl
package Example::Test;
use strict;
use warnings;
use Exporter;
our @ISA = qw(Exporter);
our @EXPORT = qw(test);
sub test
{
my $logger = Log::Log4perl->get_logger();
print $lo
浏览 2提问于2016-11-03得票数 4
回答已采纳
2回答
我使用创建日志文件，但它附加到单个日志文件中；相反，我希望为脚本的每次执行创建一个单独的日志文件。
如何创建单独的日志文件?
这是我的代码：
fetch.pl
#Opening Log configuration file
Log::Log4perl::init('./logs/log4perl.conf');
my $logger = Log::Log4perl->get_logger('./logs_$$.logs');
logs.conf
log4perl.logger = TRACE, FileAppndr1
log4perl.logger.lo
浏览 1提问于2014-04-03得票数 2
回答已采纳
1回答
我正在尝试向Log4perl记录器添加和删除一个简单的文件附加器，但系统会生成警告，并且不会打印任何内容。下面是我的代码：
use strict;
use warnings;
use Log::Log4perl qw(:easy);
Log::Log4perl->easy_init($DEBUG);
use Log::Log4perl::Appender::File;
my $app = Log::Log4perl::Appender::File->new(
filename => "C:/users/my name/Desktop/someFile.tx
浏览 5提问于2013-01-11得票数 0
回答已采纳
1回答
ActiveState Perl 5.12在WinXP上
最近，我成为了Log4perl的转换者，并成功地使用了它，我为组成我的应用程序的每个模块定义了一个特定的记录器。示例：
Upload.pm
my $logger = get_logger("Upload"); # specific logger
my $layout = Log::Log4perl::Layout::PatternLayout->new( "%d %p> %F{1}:%L %M - %m%n");
my $appender = Log::Log4perl::Appender-
浏览 1提问于2014-02-19得票数 1
回答已采纳
下面是我的代码：
use strict;
use warnings;
use Log::Log4perl qw(:easy);
Log::Log4perl->init({
level => $DEBUG
});
my $logger = Log::Log4perl->get_logger("my.logger");
my $appender = Log::Log4perl::Appender->new("Log::Log4perl::Appender::File",filename => "my.file");
浏览 0提问于2010-05-23得票数 1
回答已采纳
1回答
我已经在我的Linux机器上安装了Log4perl，并且有下面的/path/to/log4perl.conf
log4perl.logger.Fizz = INFO, FizzAppender
log4perl.logger.Buzz = INFO, BuzzAppender
log4perl.appender.FizzAppender = Log::Dispatch::FileRotate
log4perl.appender.FizzAppender.filename = /my/logs/fizz-log.txt
log4perl.appender.FizzAppender.max =
浏览 2提问于2012-12-20得票数 2
2回答
我正在为使用Log::Log4perl的现有模块编写新的单元测试，如：
use Log::Log4perl qw(:easy);
该模块调用INFO( "important message" );。我想对此进行模拟，从我的测试代码中验证在某些情况下是否调用了INFO。
当我运行测试模块时，它不会捕获模块对INFO的调用。有什么正确的方法来模拟对INFO的调用
下面是一个完整的例子：
Mut.pm
#!/usr/bin/perl -w
# Mut : Module under test
use strict;
use warnings;
package Mut;
use L
浏览 2提问于2011-06-23得票数 2
回答已采纳
我有以下用于多个脚本的log4perl.conf配置文件。它被配置为显示所有日志级别的消息。
# Log4perl configuration file
log4perl.rootLogger = ALL, screen, file
log4perl.appender.screen = Log::Log4perl::Appender::Screen
log4perl.appender.screen.stderr = 0
log4perl.appender.screen.layout = PatternLayout
log4perl.appender.screen.layout.Conver
浏览 7提问于2017-01-25得票数 2
是否可以使用Log4Perl将所有消息/级别直接登录到OutputDebugString (Windows )？
我有一些已经使用log4perl的模块，但是现在我想在一个所有日志消息都是OutputDebugStrings的环境中使用这些模块--在这个环境中，消息用DbgView读取，我想用DbgView读取模块的输出。我不想将Log4Perl日志文件与DbgView输出合并。
我使用以下Perl代码直接从perl编写OutputDebugStrings：
use Win32::API::OutputDebugString qw(OutputDebugString DStr);
Output
浏览 2提问于2013-07-23得票数 1
回答已采纳
3回答
哪个脚本初始化模块？
、、、
在Perl中，有什么方法可以判断哪个.pl脚本已经初始化了这个模块的实例？
具体来说，我想获得调用模块的脚本的名称，该模块有一个Log4perl对象。这样，我就可以知道我想在模块中写入哪个.log文件。
我做错了吗？如果我在我的$logger脚本中定义了.pl，模块中的任何$logger调用都会写入与调用脚本相同的.log文件吗？
我还没有任何示例代码，但一直在阅读Log4perl。基本上，如果我为一个文件设置了一个caller.log (这是我的调用脚本caller.pl的文件附录)，我希望在自定义导入模块中定义的任何日志记录也可以写入caller.log (如果可能的话--显然，我可以在初
浏览 2提问于2011-08-23得票数 3
回答已采纳
当与Moose一起使用时，是否可以让Log4perl正确显示日志事件的行号和包/类，而不是始终在第99行显示Method::Delegation？
在我的例子中，我创建了一个属性isa Log::Log4perl::Logger，并将各种日志级别委托给我的类(log、warn、error等)。这样做还会将Delegation.pm显示为文件。
谢谢!
浏览 1提问于2010-02-10得票数 3
回答已采纳
在使用log4perl通过电子邮件发送消息时，我看到了无法解释的行为。
因此，下面的测试脚本运行良好，并且发送电子邮件时没有问题：
#!/usr/bin/perl
use strict;
use warnings;
use Log::Log4perl qw(:easy);
use Log::Dispatch;
my $appender_email = Log::Log4perl::Appender->new(
"Log::Dispatch::Email::SSMTP",
threshold => "INFO",
to =&g
浏览 3提问于2015-12-03得票数 0
回答已采纳
我有这个sub来初始化我的记录器：
sub initLogfiles{
Log::Log4perl->easy_init($INFO); # We log all debug, info, warn, error and fatal messages.
my $userlogappender = Log::Log4perl::Appender->new(
"Log::Log4perl::Appender::File",
filename => USERLOGFILE,
mode =
浏览 1提问于2009-08-21得票数 4
回答已采纳
我想要使用logger对象获得appender文件名。
my $log_conf = {
'log4perl.rootLogger' => "DEBUG, LOG1, SCREEN",
'log4perl.appender.SCREEN' => "Log::Log4perl::Appender::Screen",
'log4perl.appender.SCREEN.stderr' => "0",
'log4per
浏览 1提问于2018-07-11得票数 1
2回答
我正在阅读，并希望尝试使用它对运行在Linux盒上的Perl脚本进行简单的日志管理。我也读过关于newsyslog和logrotate的文章，但如果可能的话，我想使用Log4perl。
我正在尝试配置/etc/log4perl.conf文件，使其：
定义一个widget记录器(INFO级别)，它将所有输出写入/opt/myapp/logs/myapp-<datetime>.log，其中<datetime>是一个日期/时间格式化字符串，如2012-12-20。
这个myapp-<datetime>.log文件需要每天旋转(最好在午夜)，删除旧文件，用&
浏览 3提问于2012-12-18得票数 3
回答已采纳
1回答
我使用Apache2和ModPerl托管我的Catalyst应用程序。web应用程序使用Log4perl模块生成日志文件。
问题是在apache服务启动时只生成日志条目。之后，没有生成新的条目。
如果我使用催化剂的集成开发服务器，日志条目就会正常生成。
我已经检查了访问权限，这些似乎没有问题: apache进程是所有者，可以编写。
谁知道是什么导致了这个问题？
这是我的log4perl配置：
log4perl.logger.myapp=INFO，日志文件
log4perl.appender.LOGFILE=Log::Log4perl::Appender::File
log4perl.appe
浏览 0提问于2013-04-17得票数 1
我想让模块在运行时管理它们的日志，但不要让所有的东西都引用一个单一的配置文件。当处理在不同权限下运行的进程时，我真的不希望每个进程都需要能够访问系统上的每个日志，而它们只写入其中的一个子集。
但是，我在Log4perl手册中找不到太多关于如何在运行时从配置文件初始化附加附加器的文档。引用了一个add_appender方法，但它适用于实例化的附加器对象，而不是conf文件。它也没有定义记录器对象和记录器->附加器关系。
我尝试让每个包从自己的conf中初始化，但每次初始化时都会破坏现有的配置。我想要做的事情大致如下：
my $foo = Foo->new() ## Checks Lo
浏览 2提问于2011-01-18得票数 8
我有一个.conf文件，其中包含
log4perl.appender.logFile = Log::Log4perl::Appender::File
log4perl.appender.logFile.filename = /myapp/conf/<ENVTAG>myapp.conf
然后，Perl脚本使用它：
Log::Log4perl::init($logConf);
my $logger = Log::Log4perl->get_logger;
$logger->info("Begin");
$logger->info(&#
浏览 2提问于2015-08-28得票数 0
我对Jenkins和Perl非常陌生，我正在尝试使用Jenkins安装Log4perl模块。下面是我在Jenkin的Execute shell框中使用的命令
perl -MCPAN -e 'install Log::Log4Perl'
下面是Jenkin控制台日志消息
12:44:49 PATH="/home/jenkins/perl5/bin${PATH:+:${PATH}}"; export PATH;
12:44:49 PERL5LIB="/home/jenkins/perl5/lib/perl5${PERL5LIB:+:${PERL5LIB}}&
浏览 5提问于2016-07-22得票数 1
回答已采纳
2回答
我有一个perl脚本，它使用log4perl将所有输出记录到屏幕和文件中。问题是，某些输出不会被定向到log4perl。
脚本-
use strict;
use warnings 'FATAL' => 'all';
use Log::Log4perl;
use File::Find;
my $log_conf = "log4perl.conf";
Log::Log4perl::init($log_conf);
my $logp = Log::Log4perl->get_logger();
my $dirSource =
浏览 8提问于2013-03-05得票数 1
回答已采纳
我使用Log::Log4Perl为我的perl脚本进行日志记录。一切都很好，除了一件事；我有一些通用模块用于不同的脚本(并由不同的用户运行)。我希望这些日志文件具有-rw-rw-rw-权限，但是下面的代码似乎没有帮助：
在我的/etc/log4perl.conf里
# Logger for /usr/local/bin/script.pl
log4perl.logger.SCRIPT=DEBUG, SCRIPT_LOG
log4perl.appender.SCRIPT_LOG = Log::Dispatch::FileRotate
log4perl.appender.SC
浏览 3提问于2013-04-03得票数 1
2回答
我从上读到关于的文章
我试图遵循教程，但在部分Logger Categories“迷失”。
我试着遵循本教程，并执行了以下脚本：
我创建了一个目录Groceries，并在其中创建了一个pm文件，如下所示：
Food.pm：
#!/usr/bin/perl
use strict;
use warnings;
package Groceries::Food;
use Log::Log4perl qw(get_logger);
sub new {
my($class, $what) = @_;
my $logger = get_logge
浏览 0提问于2013-05-26得票数 2
我正试图在Perl的帮助下构建应用程序。应用程序由来自perl的和包组成。
当我排除包Thread::Pool日志时工作。但是，当我将它包括在内时，它会给我以下错误：
ERROR: can't load appenderclass 'Log::Log4perl::Appender::File'
Could not find file for 'Log::Log4perl::Appender::File' at C:/Perl/site/lib/load.pm line 214.
工作守则：
# use Thread::Pool;
use Log::Log
浏览 6提问于2014-10-06得票数 1
回答已采纳
在log4Perl中有没有一种方法可以强制我的程序即使在eval子句之外也记录fatal？我想实现在任何未处理的程序终止的情况下调用log4perl。最好是在我的标准模块中添加相关的错误处理程序，该模块与我的所有Perl程序一起加载。
Perl版本目前是5.8，但我很快就会升级。
这是给定答案的测试代码。我在屏幕上既没有看到骰子，也没有创建die.txt。
use Log::Log4perl qw(get_logger);
$a->test();
$SIG{__DIE__} = sub {
warn "DIE";
open DIE,">die.txt&
浏览 3提问于2012-10-08得票数 2
回答已采纳
在中
$logger->debug({
filter => \&Data::Dumper::Dumper,
value => $ref
});
我可以很好地打印我的参考资料，而不是ARRAY(0xFFDFKDJ)。但是每次输入那么长的代码都太无聊了。我只想：
$logger->preprocessor({
filter => \&Data::Dumper::Dumper,
value => $ref
});
$logger->debug( $ref, $ref2 );
$logger->inf
浏览 0提问于2015-09-12得票数 3
回答已采纳
我已经将日志转换为使用Log::Log4perl，我很难使用Log：：调度：：Email：：MailSender发送电子邮件日志。下面的代码片段是我的工作示例。
use Log::Log4perl qw(get_logger :levels);
my $log4perl_conf=<<CFG
log4perl.rootLogger=INFO, Email
log4perl.appender.Email=Log::Dispatch::Email::MailSender
log4perl.appender.Email.to=me\@me.com
log4perl.appender.E
浏览 6提问于2015-05-06得票数 1
我使用的是，我希望将所有致命事件记录在单独的文件中。
这是我的剧本：
#!/usr/bin/perl
use strict;
use warnings FATAL => 'all';
use Log::Log4perl qw(get_logger);
Log::Log4perl::init('log4perl.conf');
my $l_aa = get_logger('AA');
$l_aa->fatal('fatal');
my $l_bb = get_logger('BB');
$l_b
浏览 4提问于2014-04-13得票数 0
回答已采纳
我非常想念Log4perl的easy_init中每一行的日志级别的信息。我正在运行一个大型迁移脚本，该脚本在某些特殊记录中失败，所以我需要WARNings和ERROR的grep，但是需要INFOrmation上下文来修复这些迁移脚本。
使用此代码：
#!/usr/bin/perl
use strict; use warnings;
use Log::Log4perl qw(:easy);
Log::Log4perl->easy_init($INFO);
TRACE "bar";
DEBUG "baz";
INFO "qux";
WAR
浏览 2提问于2013-06-02得票数 0
回答已采纳
我试图在Perl中创建一个自定义消息级别“警报”(在警告和错误之间)，但始终得到错误消息：
create_custom_level must be called before init or first get_logger() call at /usr/share/perl5/Log/Log4perl/Logger.pm line 705.
我对自定义级别的声明如下：
use Log::Log4perl qw(get_logger);
use Log::Log4perl::Level;
Log::Log4perl::Logger::create_custom_level("ALE
浏览 0提问于2014-02-28得票数 1
回答已采纳
1回答
我正在编写一个Log4perl记录器，并使用localtime()函数。问题是，每次我调用恢复log4perl记录器的模块(对于不同的文件)，localtime()将是不同的，当我希望将它们全部放在一个文件中时，会生成几个不同的日志文件。
有什么想法？
use strict;
use warnings;
use Config::IniFiles;
use File::Copy;
use Cwd 'abs_path';
use Path::Class;
上面的代码是我执行use LIB::Paths之前的代码，也是使用Paths.pm的第一个文件。下面的代码是Paths.pm文件
浏览 3提问于2013-02-18得票数 1
回答已采纳
我有一个自定义的log4j附加器，可以将日志消息写入到JMS队列中。如何在log4perl配置文件中使用附加器。谁能寄给我样本代码吗？
谢谢你的帮助。
浏览 1提问于2011-11-09得票数 0
回答已采纳
我试图使用一个记录器在不同的日志级别上登录两个不同的文件：
perl.pl
use Log::Log4perl;
Log::Log4perl::init('log4perl.conf');
my $logger = Log::Log4perl->get_logger('test');
$logger->trace('trace');
$logger->debug('debug');
$logger->info('info');
$logger->warn('warn')
浏览 3提问于2018-08-30得票数 2
回答已采纳
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
对象存储
实时音视频
即时通信 IM活动推荐
腾讯云开发者
