草庐IT

perl-critic

全部标签

windows - 我应该在 Windows 上使用哪个版本的 Perl?

关闭。这个问题是opinion-based.它目前不接受答案。想要改进这个问题?更新问题,以便editingthispost可以用事实和引用来回答它.关闭8年前。Improvethisquestionwin32.perl.org网站提供了针对MSWindows的多个Perl发行版的引用。很长一段时间以来,我一直在使用ActivePerlActiveState但最近我切换到StrawberryPerl.恕我直言,ActivePerl相对于StrawberryPerl的唯一优势是它带有PerlTk,这意味着它易于安装Devel::ptkdb图形调试器。除此之外,我认为StrawberryP

windows - 我应该为 Windows 选择 ActivePerl 还是 Strawberry Perl?

这个问题在这里已经有了答案:WhichversionofPerlshouldIuseonWindows?[closed](11个答案)关闭7年前。我对Perl完全陌生,但我想尝试一下。我读到有两个可用于Windows平台的竞争发行版(我想在其他操作系统上只是Perl:)。Wikipedia说StrawberryPerl如果需要,附带额外的开发工具来编译CPAN模块。我觉得这听起来不错。它还说ActivePerl有很多预打包的模块,使用PPM更容易安装。听起来也很棒!这两者之间存在明显的权衡。我想知道:我应该选择什么来开始?如果我选择一个有多难,是否会迁移到另一个?我对这两个发行版都进行

perl - perl 中来自 redis 的非阻塞 blpop

我有一个连续循环运行的程序PickonejobfromaRedisusingBLPOPProcessthejob,LOOP我需要做的是当工作正在进行时获得下一份工作,这样我就可以节省用于redisblpop的时间。我该怎么做 最佳答案 像这样:doforeverBLPOPnextjob#fromRediswait#forallbackgroundjobstofinishprocessjob&#processjobinthebackgrounddone 关于perl-perl中来自redi

Perl redis hset 没有返回正确的 retcode?

http://search.cpan.org/dist/Redis/lib/Redis.pm#hset$r->hset('hashname',$key=>$value);##returnstrueonsuccess代码.plprint$r->hset('h1','apple'=>'orange');输出:0它说它无法设置key,但是当我检查redis时,条目就在那里.../redis-clihgetallh1输出:1)苹果2)橙色既然在redis上就可以正确设置,为什么返回0?如果键已经存在但它能够更新值,它是否返回0? 最佳答案

perl - 如何为 icinga 自动安装 Redis Perl 库?

我想使用chef自动化redisperl库。我正在使用Nagios-check对于安装,但问题是在安装时系统会提示您回答各种问题。我怎样才能使这个过程自动化。我在安装时手动使用的命令是:>cpan(promptsforquestions)(cpanshellopens)>makeinstall>installBundle::CPAN>installRedis>exit基本上,我正在寻找所有这些步骤的自动化,如有任何帮助,我们将不胜感激。谢谢 最佳答案 在非交互模式下使用cpan:execute'cpan-iRedis'doonly_

perl - 操作 hmset() 需要永远

这个问题不太可能帮助任何future的访问者;它只与一个小的地理区域、一个特定的时间点或一个非常狭窄的情况相关,这些情况并不普遍适用于互联网的全局受众。为了帮助使这个问题更广泛地适用,visitthehelpcenter.关闭11年前。UPD:代码在较新的Redis模块版本上运行良好:1.904与1.2001。我正在尝试使用来自CPAN的Redis模块。设置/获取标量键时它工作正常,但是,我无法让哈希工作。这是我的示例程序:#!/usr/bin/perl-wusestrict;useRedis;my$red=Redis->new();print"use\n";$red->hmset(f

Perl Redis 监听不订阅 channel

此代码似乎无法正常工作,我不知道如何调试它。我正在使用Mojolicious通过websocket发送订阅的消息。useMojo::Redis;#Controllersubdata_stream{my$c=shift;$c->inactivity_timeout(300);my$redis=Mojo::Redis-new('redis://xxxxxxxx@localhost:6379/');my$pubsub=$redis->pubsub;my$cb=$pubsub->listen('data'=>sub{my($pubsub,$msg)=@_;$c->app->log->debug

perl - 如何手动安装 Redis perl 库,即离线。以及从哪里可以获取所有要安装的依赖项

我正在尝试安装check_redis插件,为此我需要redisperl库,但我无法访问CPAN和互联网。所以有没有办法通过下载zip文件和所有依赖项来安装。我正在使用nagios核。Hereisthepluginiamtryingtoinstall 最佳答案 因为我在工作中遇到了类似的问题,所以我碰巧就这个话题写了个人问答。在这里:Q:HowtoinstallCPANmoduleswithoutInternetaccess?A:1.InstallCPAN::Miniontheinternetmachine:$cpanCPAN::Mi

perl - ERR 错误编译脚本(新函数): user_script:2: '=' expected near 'end' , .../lib/site_perl/5.8.7/Redis.pm 第 163 行

我已经创建了基本的lua脚本来排除一个参数并打印它的值,使用redis-cli它的执行没有错误并且o/p被打印在日志文件中。$cattest.luaredis.replicate_commands()localvar=ARGV[1]print('var',var)$redis-cli--evaltest.lua,Anil$我想使用perl脚本运行lua脚本:$cateval.pl#!/usr/bin/perlusestrict;usewarnings;useRedis;my$r=Redis->new(server=>'127.0.0.1:6379',reconnect=>3,every

perl - MongoDB 不同的值

我正在使用这段代码在数据库中查找特定的文本,然后我将使用mojolicious加载到页面中。这种方法好还是快?useMongoDB;useData::Dumpq(dump);my$connection=MongoDB::Connection->new(host=>'localhost',port=>27017);my$database=$connection->test;my$col=$database->user;my$r3=$database->run_command(["distinct"=>"person","key"=>"text","query"=>""]);formy$d