-
Perl：保证常量的单一评估吗？
所属栏目：[大数据] 日期：2020-12-16 热度：82
两天内我第三个问题.有些人会说我不够努力研究,虽然我会说我正在帮助保持这个部分活跃：P无论哪种方式,我都在大声思索,希望得到一个答案. 不用多说了,让我引用常量pragma文档中的声明： When a constant is used in an expression,Perl replaces it with its[详细]
-
perl – 数字和字符串之间自动转换的效率没有影响？
所属栏目：[大数据] 日期：2020-12-16 热度：132
Perl中的数字和字符串之间有自动转换. 来自Llama的书： You don’t need to worry about the difference between numbers and strings; just use the proper operators,and Perl will make it all work. And if you’re worried about efficiency,don’t be.[详细]
-
增加Perl警告的详细程度
所属栏目：[大数据] 日期：2020-12-16 热度：150
有没有办法增加Perl警告的冗长程度？ 我用它来生成警告. #!/usr/bin/perl -w 我对偶尔遇到的以下内容特别感兴趣.无论如何,Perl可以打印未初始化变量的名称吗？ Use of uninitialized value in printf at ./script.pl line 106,LOG line 323805. 解决方法 如[详细]
-
有人可以在Perl中解释哈希吗？
所属栏目：[大数据] 日期：2020-12-16 热度：107
主功能： my %hash = {'inner1'={'foo'=5},'inner2'={'bar'=6}};$object-State(0,%AMSValues); 寄去： sub State{ my ($self,$state,%values) = @_; my $value = %values; 据我所知,一个应该是哈希,另一个是指针,但…… 它看起来不像是这样的, $value = $va[详细]
-
Perl编程：继续阻止
所属栏目：[大数据] 日期：2020-12-16 热度：183
我刚开始学习Perl脚本语言并且有一个问题. 在Perl中,使用while循环继续阻塞工作的逻辑原因是什么,而不是for循环？ 解决方法 你可以在任何有意义的地方使用一个继续块：with while,until和foreach循环,以及’basic’块 – 不属于另一个语句的块.请注意,对于列[详细]
-
如何在OSX Snow Leopard 10.6上安装perl DBD :: Oracle
所属栏目：[大数据] 日期：2020-12-16 热度：99
我正在尝试从运行OSX 10.6雪豹的intel mac连接远程系统上的Oracle 10.2.0.4.我已经尝试使用perl CPAN来安装DBD :: Oracle(DBI工作正常)但是会出现编译错误.有人可以提供一个易于遵循的指南吗？ 解决方法 得到一个perl的mac安装程序可以很好地与oracle一起玩,[详细]
-
Perl XML :: Twig问题请
所属栏目：[大数据] 日期：2020-12-16 热度：74
我在Perl中使用 XML :: Twig库,我不太确定我是如何(或者甚至)我可以做到以下几点.我还没有完成代码,因为我甚至不知道从哪里开始.我真的追求一些想法,我可以(希望)从那里开始…… 所以我想使用XML :: Twig来查找值“This_Is_My_Name”,它是标记“MyClass.Name[详细]
-
算法 – Perl中的QuickSort
所属栏目：[大数据] 日期：2020-12-16 热度：171
我尝试在Perl中实现QuickSort,就像我在 Python和Ruby中使用以下代码一样： use strict;use warnings;sub sort { my ($lista,$p,$r) = @_; if ($p $r) { my $q = partition(@$lista,$r); sort(@$lista,$q - 1); sort(@$lista,$q + 1,$r); }}sub partition[详细]
-
最快的Perl模板库
所属栏目：[大数据] 日期：2020-12-16 热度：199
什么是最快的perl模板库,它允许我执行以下操作： 变量替换, 循环(Hashes Arrays), 布局(包装模板) 和至少一些条件逻辑(！= ==％). ..还有任何人使用pltenjin?基准测试表明这是非常迅速的. 解决方法 我推荐你使用Xslate模板引擎( http://xslate.org/),它比其[详细]
-
刷新线读操作符Perl
所属栏目：[大数据] 日期：2020-12-16 热度：146
用到达eof后会发生什么perl中的运算符？ 我正在逐行阅读INP1 while(INP1) {} 但我需要多次读取这个,我需要每次从文件的开头开始.我怎样才能做到这一点？是否有像在perl中刷新流的东西？ 提前致谢. 解决方法 如果INP1连接到常规文件句柄(不是套接字句柄或管道[详细]
-
为什么Perl的printf输出格式说明符而不是格式化数字？
所属栏目：[大数据] 日期：2020-12-16 热度：181
我正在尝试调试远程用户站点上的问题.我们已经将它缩小到Perl中格式化输出的问题.用户发誓说 perl -e 'printf "Number: %lGn",0.1' 版画 Number: %lG 不 Number: 0.1 用户报告他们的Perl是5.8版.我最古老的版本是5.8.1,它似乎行为正常. 任何猜测？配置错误[详细]
-
为什么我不能在Perl程序中调用导出的子程序？
所属栏目：[大数据] 日期：2020-12-16 热度：163
我是Perl的新手,我面临以下问题,不知道为什么跟随不起作用. 我的Perl模块包含： package PACK2;use Exporter;@ISA = ('Exporter');@EXPORT_OK=('whom');sub why(){ print "whyn";}sub whom(){ print "whomn";}1; 我的Perl文件包含： #!/usr/bin/perl -wuse[详细]
-
如何打开Perl未知全名的文件？
所属栏目：[大数据] 日期：2020-12-16 热度：199
我想知道是否有任何东西可以让我做以下事情： folder1 has files "readfile1" "f2" "fi5" 我唯一知道的是我需要读取以readfile开头的文件,我不知道字符串readfile后名称中有什么.另外,我知道目录中没有其他文件以readfile开头. 如何使用open命令打开此文件？[详细]
-
如何获取正在运行的Perl脚本的路径和名称(C中的argv [0])
所属栏目：[大数据] 日期：2020-12-16 热度：110
在C/C++中(bash,也是？)第一个命令行参数argv [0]是二进制文件名(以用户调用的绝对路径或相对路径为前缀). 在Perl中,第一个命令行参数$ARGV [0]是脚本的路径和名称之后的第一个命令行参数. Perl脚本如何获取用于调用它的路径和名称？ 谢谢！ 解决方法 “In C[详细]
-
perl – 计算日期的年数增量
所属栏目：[大数据] 日期：2020-12-16 热度：111
我试图找出一种方法来计算记录的出生年份,在给定日期给出两位小数的年龄 – 在Perl中. 为了说明这个例子,考虑以下两个记录： date,age at date25 Nov 2005,74.2321 Jan 2007,75.38 我想要做的是根据这些记录获得出生年份 – 从理论上讲,它应该是一致的.问题[详细]
-
如何使用Perl XML SAX解析器创建XML :: Simple数据结构？
所属栏目：[大数据] 日期：2020-12-16 热度：187
简介：我正在寻找一个快速的 XML解析器(很可能是一些标准SAX解析器的包装器),它将生成与 XML::Simple生成的数据结构100％相同的每个记录数据结构. 细节： 我们有一个庞大的代码基础结构,它依赖于处理记录,并且希望记录是XML :: Simple生成的格式的数据结构,[详细]
-
perl – 如何制作WWW：机械化以不两次获取页面？
所属栏目：[大数据] 日期：2020-12-16 热度：178
我有一个用OO Perl编写的网络抓取应用程序.应用程序中使用了单个 WWW::Mechanize对象.如何使其不能两次获取相同的URL,即使用相同的URL no-op创建第二个get()： my $mech = WWW::Mechanize-new();my $url = 'http:://google.com';$mech-get( $url ); # first[详细]
-
如何从Perl中的URL中提取方案,主机和端口？
所属栏目：[大数据] 日期：2020-12-16 热度：63
我需要能够从URL中提取方案,主机和端口. 所以,如果我在浏览器中的网址是：http：//www.example.com：80 / something.pl 我需要能够得到：http：//www.example.com：80 解决方法 URI模块可以帮助您以任何方式切片和切块URI. 如果您尝试在CGI脚本中执行此操作,[详细]
-
需要帮助“打包”for perl和php
所属栏目：[大数据] 日期：2020-12-16 热度：93
我的任务是将perl制作的crypt函数转换为php代码.一切正常,除了这个： Perl的： $wert = Encode::encode( "utf8",$wert );$len=length $wert;$pad = ($len % 16)?"0".chr(16 - ($len % 16)):"10";$fuell = pack( "H*",$pad x (16 - $len % 16)); PHP： $wert[详细]
-
ActivePerl在安装过程中“重定位”文件时做了什么？
所属栏目：[大数据] 日期：2020-12-16 热度：158
鉴于我编译的一些unix程序,我需要做些什么才能将它重新定位到不同的目录并让它继续正确运行. 我正在考虑Perl,但是会对像Apache这样的其他系统感兴趣,这些系统在完成后似乎也会失败.为了激发这个问题,在将其他系统捆绑为产品安装的一部分时,能够执行此类重定[详细]
-
如何使用Perl从大文件中删除非唯一行？
所属栏目：[大数据] 日期：2020-12-16 热度：174
使用Perl通过 Windows中的批处理文件调用重复数据删除 Windows中的DOS窗口通过批处理文件调用. 批处理文件调用执行操作的Perl脚本.我有批处理文件. 只要数据文件不是太大,我工作的代码脚本就会删除重复数据. 需要解决的问题是数据文件较大(2 GB或更多),在此[详细]
-
perl – 如何在DBI查询中使用变量作为表的名称？
所属栏目：[大数据] 日期：2020-12-16 热度：60
如何在DBI查询中使用变量作为表的名称？我知道如何使用占位符作为where子句的一部分,但是如何为表名执行此操作？ 我想做这样的事情： my $table_name='table1'; my $query = $dbh_cgi-prepare("select * from ?"); $query-execute($table_name); 到目前为止,[详细]
-
perl – 在Solaris 9上睡觉时的SIGALRM
所属栏目：[大数据] 日期：2020-12-16 热度：131
在Solaris 9(Sparc)上的chroot环境中运行Perl时,我遇到了一些奇怪的错误.我们使用的是自定义Perl,但它几乎完全是Perl 5.8.7,而且这个版本已经在包括Solaris 8-10在内的各种平台上运行了多年. 以下代码非常简单： #!/usr/bin/perluse strict; use warnings;pr[详细]
-
如何从perl中的所有数组元素中减去1
所属栏目：[大数据] 日期：2020-12-16 热度：99
我有一个包含值的数组.我需要从每个数组元素中减去1并且保存在那里. 例如： chop $tve_005;@words = split (/,/,$tve_005); 现在@words包含： 5242101713409311919142213416658312 但是在其余代码中需要使用的实际值是:(总是减去1) 524209171340831191814221[详细]
-
Perl初始化值：“”vs q {}和0 vs(1 == 2)
所属栏目：[大数据] 日期：2020-12-16 热度：59
my $EMPTY = q{};use constant TRUE = ( 1==1 );use constant FALSE = ( 1==2 );my $a = ""; vs my $a = $EMPTY; my $b = 0; vs my $b = FALSE 应该使用哪种方法有什么区别？ 这取决于某些情况吗？ 如果是这样的话,那些关于你何时想要使用我的$b = 0的情况是[详细]
