有没有与 Perl 的 Sonar 等价的东西?
Perl 是否有与 Sonar 等效的东西? 解决方案 Smolder 是一个持续集成框架它运行冒烟测试并生成覆盖率报告、统计数据和漂亮的图表.它接受 TAP 输入，因此可以插入任何可以提供此功能的内容.您可以使用各种TAP 模块在 Perl 端提供集成. 您还可以调整现成的构建系统.哈德森, Cruise Control 和 BuildBot 都可以为 Perl 项目配置，尽管功能
..
perl相关内容
从 Perl 调用系统命令
在我们的代码的旧版本中，我们从 Perl 调用执行 LDAP 搜索，如下所示: # 通过 ldapsearch-specific 环境变量传入基本 DN#(而不是作为“-b"参数)以避免shell问题# DN 中特殊字符的解释.$ENV{LDAP_BASEDN} = $ldn;$lcmd = "ldapsearch -x -T -1 -h $gLdapServer" .">$lworkf
..
从 1000 增加限制?
当我这样搜索时 我的 $mesg = $ldap->search(基础=>"OU=test,DC=example,DC=com",范围=>'一'，过滤器=>'(objectClass=organizationalPerson)',属性=>['distinguishedName', 'displayName', 'sAMAccountName', 'employeeID'],); 我只收到 10
..
如何在 CGI 脚本中访问请求的 HTTP 标头?
我在小型应用程序和测试代码中使用过一些 Perl，但我对网络和 CGI 不熟悉. 我知道如何制作请求的标头(使用 CGI.pm 并打印 header() 函数的结果)，但无法找到有关如何访问发送到我的标头的任何信息CGI 脚本.有人能指出我正确的方向吗? 这可能来自这样的请求: curl http://127.0.0.1:80/cgi-bin/headers.cgi -H "
..
如何使用 SMTP 和 Perl 向我的 Gmail 帐户发送电子邮件?
我不想使用 sendmail 发送电子邮件，但更喜欢使用 SMTP.如何使用 Perl 向我的 GMAIL 帐户发送电子邮件? 解决方案 我个人建议你使用我的模块 Email::Send::SMTP::TLS它通过 Google Mail 的 TLS 运行良好. 谢谢. 使用Email::Send；我的 $mailer = Email::Send->new({邮件=>'SMTP::
..
在 Perl 中通过 SMTP 发送邮件
我正在尝试在 Perl 中通过 SMTP 发送邮件. 我为此编写了一个脚本. #!perl使用警告；使用严格；使用网络::SMTP；我的 $smtpserver = '服务器';我的 $smtpport = 25;我的 $smtpuser = '用户名';我的 $smtppassword = '密码';我的 $smtp = Net::SMTP->new($smtpserver, Port=
..
为什么我会收到“SMTP 无法连接到邮件服务器:"当我尝试使用 MIME::Lite 向 Gmail 帐户发送电子邮件时?
我有以下代码在 Perl 中发送电子邮件: #!/usr/bin/perl使用 MIME::Lite；$to = 'toid@domain.com';$cc = 'ccid@domain.com';$from = 'fromid@domain.com';$subject = '测试电子邮件';$message = '这是 Perl 脚本发送的测试邮件';$msg = MIME::Lite->ne
..
在perl中舍入十进制数，错误的结果
我讨厌十进制数字.对于 1.005，我没有得到以下代码所期望的结果. #!/usr/bin/perl -w使用严格；使用 POSIX qw(地板)；我的 $num = (1.005 * 100) + 0.5;打印 $num ."\n";#101打印楼层($num)."\n";#100打印 int($num) ."\n";#100 对于 2.005 和 3.005，它工作正常. 通过这个丑
..
如何扩展像“1..15,16"这样的字符串?进入数字列表?
我有一个 Perl 应用程序，它从命令行获取输入: 应用程序--fields 1-6,8 我需要在命令行上显示用户请求的字段. 我想用 '..' 替换 '-' 以便我可以将它们存储在数组中，例如 $str = "1..15,16" ;@arr2 = ( $str ) ;@arr = (1..15,16);打印“@arr\n"；打印“@arr2\n"； 这里的问题是 @arr 工作正常
..
在 Perl 中将字符串中的十六进制数转换为负数
我在由 Perl 脚本解析的日志文件中有一堆数字表示为十六进制字符串，而我对 Perl 相对缺乏经验. 其中一些数字实际上是有符号负数，即 0xFFFE == -2 当表示为 16 位有符号整数时. 谁能告诉我从 Perl 中的字符串 FFFE 中获取该数字的签名表示的规范方法，或者以其他方式为我提供教程或其他资源? 解决方案 你可以使用 hex() 函数将十六进制转换为十进制
..
如何判断一个变量在 Perl 中是否有数值?
在 Perl 中是否有一种简单的方法可以让我确定给定变量是否为数字?大致如下: if (is_number($x)){ ... } 将是理想的.在使用 -w 开关时不会引发警告的技术当然是首选. 解决方案 使用 Scalar::Util::looks_like_number() 使用内部 Perl C API 的looks_like_number() 函数，这可能是最有效的方法来做到这
..
在 Perl 中应用编码标准是否有任何好的自动化框架?
我知道的是 Perl::Critic 到目前为止，我的谷歌搜索多次尝试都没有结果.:-( 这里有人有什么建议吗? 任何根据我们的编码标准配置 Perl::Critic 并在代码库上运行它的资源将不胜感激. 解决方案 在设置profile方面，你有没有尝试过perlcritic --profile-proto?这会将您安装的所有策略及其所有选项以及两者的描述(包括它们的默认
..
如何在 Perl 脚本中导出 shell 变量?
我有一个 shell 脚本，其中包含一个 shell 变量列表，在进入编程环境之前执行. 我想用Perl脚本进入编程环境: system("environment_defaults.sh");系统(“奥贝")； 但是当我进入环境时，变量并没有设置. 解决方案 当你调用你的第二个命令时，它并没有在你在第一个命令中修改的环境中完成.事实上，没有第一个命令留下的环境，因为用来调用“en
..
为什么 Perl 的 glob 每次调用都返回 undef?
我不一定要寻找更好的方法来做到这一点，而是非常感谢对输出的解释.最近，一位资深程序员问我为什么他的代码有效，但只是一个例子.我发现它每隔一段时间都有效.这是我的例子: #!/usr/bin/perl -w使用严格；我的@list_env_vars = ('$服务器','$服务器','$服务器','$服务器','$服务器','$服务器',);foreach (@list_env_vars){打印
..
如何在 Perl 中设置环境变量?
如何在 Perl 中设置环境变量? 我想将 $HOME 设置为与默认目录不同的目录. 解决方案 你可以这样做: $ENV{HOME} = '不同的东西'; 但请注意，这只会对脚本的其余部分产生影响.当您的脚本退出时，调用 shell 不会看到任何变化. 正如 perldoc -v %ENV 所说: %ENV 哈希 %ENV 包含您当前的环境.在“ENV"中设置一个值会
..
如何确定脚本是从命令行调用还是作为 cgi 脚本调用的?
我编写了一个脚本，既可以在命令行上使用，也可以作为 CGI 脚本使用，并且需要确定脚本是如何被调用的，这样我就可以为 Web 请求输出一个内容类型的标头(也许还有一些反缓存头).我的第一个想法是检查http环境变量是否存在: 我的 $js = build_javascript();if ( 存在 $ENV{HTTP_HOST} ) {打印“内容类型:文本/javascript\n\n"；}打印
..
Mac OS:/usr/bin/env:错误的解释器:不允许操作
我正在尝试在 Mac OS 10.7 (Lion) 上运行此脚本，但出现错误: $ bbcolors-bash:/usr/local/bin/bbcolors:/usr/bin/env:错误的解释器:不允许操作 我已在我的其他 Mac 上成功运行此脚本.它只是这个脚本从 Daring Fireball 下载并未经修改的. 我发现 这个人有一个非常相似的问题，但公认的答案是文件系统在挂载时
..
Perl 脚本可以安装它自己的 CPAN 依赖项吗?
我有一个 Perl 脚本，它在 CPAN 中存在两个依赖项.我想做的是让脚本本身提示用户安装必要的依赖项，以便脚本能够正常运行.如果用户需要输入某种身份验证来安装依赖项，这很好:我试图避免的是以下工作流程: 运行脚本 -> 看着它失败 -> 漫无目的地搜索 CPAN -> 私刑脚本作者 相反，我希望得到类似的东西: 运行脚本 -> 自动下载脚本依赖项(必要时进行身份验证)-> 脚
..
如何告诉 CPAN 安装所有依赖项?
如何告诉 CPAN 安装所有依赖项? 我尝试在 cpan 中设置这些: cpan>o conf 先决条件_政策遵循cpan>o conf 提交 我仍然不得不回答“y"几次(但感觉比以前少了). 有没有办法让它始终继续安装?我想让它无人看管. 似乎我想要一个标志来始终信任 CPAN 做正确的事情，如果它建议一个答案，我想遵循它(当它问什么时总是按 Enter). 解决方案
..
perl - 比较来自 2 个数据库的两个 SQL 查询的两列
在 perl 中，如果数据库 1 中的名称和数据库 2 中的名称相等，我想将数据库 2 中的年份和部分插入数据库 1 数据库 1 数据库 2------------------------------------ ---------------------------------表 truc 表 truc2------------------------------------ --------
..