首页 文章
  • 1 votes
     answers
     views

    Perl LDAP搜索用户是CN属性

    如何对用户作为访问组或其子组中的属性进行Perl LDAP搜索/身份验证? 所有用户(UID)都在: ou=Users,o=company,c=com 访问组是: cn=Site Full Access,ou=Access,o=company,c=com Access组具有用户和子组作为属性,如: uniquemember | uid=usernameA,ou=Users,o=company,...
  • 1 votes
     answers
     views

    无法使用Perl绑定到Active Directory

    我刚刚安装了Net :: LDAP,但我无法对AD服务器进行身份验证 . #!/usr/bin/perl use strict; use Net::LDAP; my $ldap = ""; $ldap = Net::LDAP->new("serv01.noboundaries.dyndns.org"); my $mesg = "&quot...
  • 1 votes
     answers
     views

    Perl,ClamAV,扫描流中的病毒

    我有一个perl应用程序 . 我需要扫描一些文件以查找病毒 . 我可以使用ClamAV和模块File :: Scan :: ClamAV . 如果我需要扫描存储在磁盘上的某些文件或者将文件加载到内存(对于某个变量),它就可以工作 . 但我的应用程序没有完整的文件 . 它只有一个输入流(打开的套接字) . 它从此套接字读取并写入其他输出流 . 我可以通过ClamAV以某种方式传递流吗?喜欢将我的输入...
  • 0 votes
     answers
     views

    Perl切片和参考

    我创建了以下切片: my %hash = ( a => 1, b => 2, c => 3 ); my @backslashed_slice_result = \@hash{qw(a b c)}; # $backslashed... <-- originally I wrote this is a scalar, see below. 我希望这会产生一个对由散列片填充的...
  • 1 votes
     answers
     views

    MongoDB - 在哈希数组的字段中添加/删除元素如何

    我正在使用perl MongoDBx :: Class,按照我在下面插入文档的教程 . tags字段是一个hash数组 . 尝试使用mongodb的$ pull和$ addToSet函数删除标记并添加标记,但没有成功 . 如何在标签字段中添加/删除元素?如果你不是perl程序员,请在mongodb shell命令中回答wlcome . 谢谢 . my $novel = $novels_coll-...
  • 12 votes
     answers
     views

    我可以将STDOUT和STDERR发送到日志文件,也可以发送到Win32 Perl中的屏幕吗?

    我搜索过互联网并找到了一些很好的解决方案,可以将STDOUT发送到2个不同的地方 . 喜欢日志文件,同时也喜欢屏幕 . 这是一个例子: use IO::Tee; my $log_filename = "log.txt"; my $log_filehandle; open( $log_filehandle, '>>', $log_filename ) or die...
  • 3 votes
     answers
     views

    Perl,重定向标准输出,但保持父级

    在perl中,在 fork() 之后,我可以将子项的stdout重定向到这样的文件 open STDOUT,">",$filename or die $! 我'm wondering if there is a way of 2758573 , keeping the stdout on the parent' s stdout但也复制到指定的文件 . 它应该以不需要...
  • 2 votes
     answers
     views

    在将STDOUT传送到文件时捕获STDERR的输出

    我有一个相当奇怪的情况 . 我正在尝试使用Perl自动备份SVN存储库集合 . 我正在炮轰svnadmin dump命令,该命令将转储发送到STDOUT,以及遇到STDERR的任何错误 . 我需要运行的命令将采用以下形式: svnadmin dump $repo -q >$backupFile STDOUT将转到备份文件,但是,我需要在我的Perl脚本中捕获STDERR . 处理这种情况的...
  • 2 votes
     answers
     views

    perl合并输出和windows中的stderr和过滤行

    我想在perl中运行一个外部命令并过滤一些行 . 我不知道如何过滤去stderr的行 . 我现在有以下代码: #!/usr/bin/env perl use File::Spec; #open STDERR, '>', File::Spec->devnull() or die "could not open STDERR: $!\n"; open(FILEHAN...
  • 4 votes
     answers
     views

    将父进程的STDERR重定向到子进程的文件句柄

    我需要从Perl脚本调用外部日志记录进程,该脚本将传递给它的数据并将其写入网络服务 . 这很容易做到 . 但是,我还有一个额外的要求,即从父进程对STDERR的任何写入都会被重定向到外部进程 . 我尝试做的是打开外部进程的写管道的文件句柄,然后将STDERR重定向到文件句柄 . 这是我的测试脚本,遗憾的是还没有用 . #!/usr/bin/perl use strict; use warning...
  • 1 votes
     answers
     views

    添加日志记录到我的Perl安装脚本

    我正在编写一个Perl脚本,它将为我们的应用程序安装软件更改 . 这主要涉及在sqlplus中运行sql文件 . 虽然我记录每个运行的sql文件并grep每个日志文件以查找错误,但我希望获得所有内容的单个日志文件 . 这样,如果在安装过程中出现奇怪的事情,我将会有一个文件,其中包含安装补丁时发生的所有事情 . 如果我用bash写这个,我会做以下事情: exec >my_log_file ex...
  • 0 votes
     answers
     views

    如何将Parallel :: ForkManager和Exec的STDOUT重定向到文件

    我试图使用Perl Parallel:ForkManager运行多个命令 . 我希望这些命令在不同的时间段运行 . 我正在使用子程序is_time_elapsed来检查是否有时间运行该命令 . 如果子例程返回0,那么我正在使用并行fork管理器运行该命令 . 命令正在执行,但我在屏幕上看到STDOUT . 相反,我想将STDOUT和STDERR重定向到一个文件 . 如何防止STDOUT在屏幕上看到...
  • 3 votes
     answers
     views

    使用system命令将stdout和stderr输出重定向到文件在perl [duplicate]中不起作用

    这个问题在这里已有答案: How can I redirect and append both stdout and stderr to a file with Bash? 7个答案 当我尝试将命令的stdout和stderr输出重定向到文件时 . 没有任何东西可以写入文件 . 这是一个Perl脚本 . 我希望将命令的stdout和stderr输出重定向到文件 . 我写的代码是这样的: sys...
  • 3 votes
     answers
     views

    将STDOUT和STDERR重定向到文件,系统的标准输出/错误除外()

    我试图在Linux中运行Perl脚本并使用以下命令将所有输出记录到STDOUT和STDERR到文件: open (STDOUT, "| tee -i $transcript_file"); open (STDERR, "| tee -ai $transcript_file"); 使用它的脚本大致如下: 创建用于运行工具的环境 . 有很多 print ,...
  • 4 votes
     answers
     views

    从perl中的external * nix命令获取STDOUT,STDERR和响应代码

    我想从我的Perl脚本中执行外部命令,将stdout和stderr的输出放入我选择的 $variable 中,并将命令的退出代码放入 $? 变量中 . 我在perlfaq8和他们的论坛中找到了解决方案,但他们并没有为我工作 . 奇怪的是,只要退出代码是正确的,我在任何情况下都不会获得sdterr的输出 . 我在Red Hat Linux 5上使用Perl版本5.8.8 . 这是我正在尝试的一个例子...
  • 4 votes
     answers
     views

    从perl中的external * nix命令获取STDOUT,STDERR和响应代码

    我想从我的Perl脚本中执行外部命令,将stdout和stderr的输出放入我选择的 $variable 中,并将命令的退出代码放入 $? 变量中 . 我在perlfaq8和他们的论坛中找到了解决方案,但他们并没有为我工作 . 奇怪的是,只要退出代码是正确的,我在任何情况下都不会获得sdterr的输出 . 我在Red Hat Linux 5上使用Perl版本5.8.8 . 这是我正在尝试的一个例子...
  • 3 votes
     answers
     views

    从使用Perl创建的Excel 2007文件中读取 Headers 行时出现问题

    我在合并两个动态创建的Excel 2007文件时遇到问题 . 我的文件是使用Solaris上的Perl模块 Excel::Writer::XLSX 创建的 . 假设我有两个文件,fileA.xlsx和fileB.xlsx . 现在我想将它们合并在一起(fileA fileB => fileC) . 目前无法将fileB附加到fileA . 这是Excel :: Writer :: XLSX的...
  • 1 votes
     answers
     views

    Perl检查字符串是否是有效正则表达式匹配的前缀

    通常,是否可以确定给定字符串是否是Perl中正则表达式的任何可能匹配的前缀? OCaml正则表达式库 Str 支持的一个有趣功能是 string_partial_match . 此函数确定从给定位置开始的字符串部分是a)匹配的前缀还是字面上匹配本身,或b)不是任何匹配字符串的前缀 . 来自Str documentation: val string_partial_match:regexp -...
  • 1 votes
     answers
     views

    在存储库ubuntu 12.04上找不到libdigest-sha1-perl

    有没有办法在我的ubuntu 12.04上安装libdigest-sha1-perl?我找到了这个: wget http://launchpadlibrarian.net/85191944/libdigest-sha1-perl_2.13-2build2_amd64.deb dpkg -i libdigest-sha1-perl_2.13-2build2_amd64.deb (change am...
  • 2 votes
     answers
     views

    使用perlbrew时安装模块

    我试图使用perlbrew来运行一组perl脚本 . 当我尝试为这些perl脚本安装依赖项时,它们被安装到我的系统的perl版本(5.18.X)而不是我想要使用的版本(5.10.1) . 我已尝试过stackoverflow上其他线程的几个建议,但无济于事 . 这是一个发生了什么的例子 . 我会做以下事情: perlbrew使用perl-5.10.1 perl -v(返回perl-5.10.1)...
  • 0 votes
     answers
     views

    尝试创建新用户并在web min中更新用户时出错

    我不知道在安装过程中我做错了什么..我使用的是ubuntu服务器17.04 . 我无法创建新用户并编辑用户 . 请帮我理解我做错了 错误: 无法在@INC中找到timelocal.pl(@INC包含:/ usr / share / webmin / etc / perl /usr/local/lib/x86_64-linux-gnu/perl/5.24.1 / usr / local / shar...
  • 0 votes
     answers
     views

    在Perl中安装DBI模块面临的问题

    我在Centos 7服务器上安装了DBI模块,但每当我尝试通过Perl脚本连接到mysql时,我的ERROR如下所示请帮忙 install_driver(mysql)失败:无法在@INC中找到DBD / mysql.pm(您可能需要安装DBD :: mysql模块)(@INC包含:/usr/local/lib/perl5/site_perl/5.24.1 / x86_64-linux /usr/l...
  • 1 votes
     answers
     views

    Rstudio中的源.bashrc

    我刚刚在Ubuntu 18.04 LTS中本地安装了一些Perl模块 . 当像这样使用RStudio Server调用它们时 system("perl -MBio::TreeIO -e 1") 我收到以下错误 无法在@INC中找到Bio / TreeIO.pm(您可能需要安装Bio :: TreeIO模块)(@INC包含:/ etc / perl / usr / local...
  • 1 votes
     answers
     views

    在perl中使用Telnet时出现问题?

    我在发送命令和从我设置的telnet连接接收文本/数据时遇到了一些麻烦 . #!perl #Telnet.pl use Net::Telnet; # Create a new instance of Net::Telnet, my $telnetCon = new Net::Telnet (Timeout => 20, ...
  • 0 votes
     answers
     views

    config lighttpd 在 macos 中处理 perl 的 cgi

    我用brew install lighttpd在我的 macos 上安装lighttpd然后在/usr/local/etc/lighttpd/lighttpd.conf中添加lighttpd.conf添加配置是: server.modules += ( "mod_cgi" ) $HTTP["url"] =~ "/cgi-bin/"...
  • 0 votes
     answers
     views

    使用 Perl 通过 api 在 tumblr 上发布几张图片

    我试图通过 perl API 在 tumblr 中发布 3 张图片... 我有这个代码工作好一张图片: use LWP::Authen::OAuth; use Data::Dumper; my $ua = LWP::Authen::OAuth->new( oauth_consumer_key => 'xxx', oauth_consum...
  • 0 votes
     answers
     views

    使用perl脚本将图表添加到Excel

    我想从excel文件创建一个图表 . 数据已经添加,我想读取数据并创建excel . 实际上它正在跳过一些x轴值 . 我试过这样的 . my $chart1 = $workbook->add_chart( type => 'column', embedded => 1 ); $chart1->add_series( catego...
  • 0 votes
     answers
     views

    为什么这个perl排序不能按预期工作?

    我首先计算数组中的键数 . 当“vectranet”项目的数量超过9时,排序无法正常工作 - “vectranet”不是排序列表中的第一个(我按哈希值排序),这是我的代码,请帮助我,我会发疯:-)这个表格告诉我,我的帖子主要是代码,我应该提供更多细节,但我不能再写任何文字我解释了一切,我需要附上这个巨大的数组,让你看看我的问题是什么:( @cprov=( 'vectranet.pl', 'airm...
  • -3 votes
     answers
     views

    只需穿上Perl,不用叉子,File :: Tee或T恤管道

    在Perl中是否有 simple way 将STDOUT或STDERR发送到多个地方而不使用File :: Tee或打开管道到/ usr / bin / tee? 当然有一种方法可以在 pure perl 中执行此操作而无需编写20行代码,对吧?我错过了什么?在SO和其他地方都提出了类似的问题,但没有一个答案符合我不必要的要求 前叉 使用File :: Tee / IO :: Tee /一...
  • 56 votes
     answers
     views

    你如何在Perl中同时捕获stderr,stdout和退出代码?

    是否可以从Perl运行外部进程,捕获其stderr,stdout和进程退出代码? 我似乎能够做这些的组合,例如使用反引号获取stdout,使用IPC :: Open3捕获输出,使用system()获取退出代码 . 你如何一次捕获stderr,stdout和退出代码?

热门问题