-
perl – 如何将PHYLIP格式转换为FASTA
所属栏目：[大数据] 日期：2020-12-16 热度：94
我刚开始使用perl,我有一个问题.我有PHYLIP文件,我需要将其转换为FASTA.我开始写一个脚本.首先,我删除了行中的scpaces,现在我需要对齐每行中应该是60个氨基酸的所有行,并且应该在新行中打印sequances识别符.也许有人可以给我一些建议？ 解决方法 BioPerl Bio[详细]
-
在Perl中的exec之后将数据从子节点传递给父节点
所属栏目：[大数据] 日期：2020-12-16 热度：93
我想在另一个perl程序parent.pl中调用perl程序child.pl,并希望将数据从child.pl传递给parent.pl并通过parent.pl打印这些数据. system(“perl child.pl”)可能不起作用,因为parent.pl在child.pl完成之前不会执行任何操作.我读了 the online doc of perlipc,似[详细]
-
perl – END块中的本地($？) – 为什么分配给它的值是多少？
所属栏目：[大数据] 日期：2020-12-16 热度：88
在工作中,我们在与对象的析构函数中的子进程交互时遇到错误,并最终将其追踪到$？在等待调用期间被覆盖的变量.这是在调用exit()之后发生的,所以$？另外还意味着我们程序的返回代码到操作系统. 具体来说,perldoc谈到了这种错误： Inside an END subroutine $?[详细]
-
我应该将perl’xt’测试上传到CPAN吗？
所属栏目：[大数据] 日期：2020-12-16 热度：87
前段时间,新的东西出现在Perl世界中.事情是要创造 xt目录中的模块源代码并放置那些应该的测试 只能由作者运行. xt测试的想法是它们不会在运行时运行 该模块从CPAN安装. 我想如果安装过程不需要测试 无需将该测试上传到CPAN.我的想法是进行这些测试 在我的VSC[详细]
-
基于一个项的值对Perl中的二维数组进行排序,但有异常
所属栏目：[大数据] 日期：2020-12-16 热度：186
目前,我正在使用二维数组,其中包含有关足球进球的信息.第一个数组中的每个项目都是一个数组,其中包含有关目标的不同信息.这个数组中的第二项是得分(1-90),因为我想按顺序排列它们,所以我可以确定它们是什么作出了得分线.我正在使用’分钟’值来对此进行排序[详细]
-
perl – 如何使用具有端口重用的套接字的AnyEvent :: Handler
所属栏目：[大数据] 日期：2020-12-16 热度：121
最近我遇到了一个很棒的perl模块“AnyEvent”,它允许用户进行异步/事件驱动的编程. 创建了以下代码片段,工作正常.我遇到的问题是,在打开并关闭许多套接字后,它很快耗尽了所有客户端端口(“netstat -ant”显示20,000个套接字处于TIME_WAIT状态). $hdl = new A[详细]
-
使用AnyEvent创建单个线程服务器(Perl)
所属栏目：[大数据] 日期：2020-12-16 热度：195
我正在创建一个本地服务来监听localhost并提供一个基本的调用和响应类型接口.我想要开始的是一个婴儿服务器,您可以通过telnet连接并回应它收到的内容. 我听说AnyEvent对此非常有用,但是AnyEvent :: Socket的文档并没有给出一个很好的例子.我想用AnyEvent,Any[详细]
-
perl：“不包括”模块
所属栏目：[大数据] 日期：2020-12-16 热度：83
所以,我有一个这样的程序： #!/usr/bin/perl -w use strict; foreach (@data) { if($_ eq "foo") { use Foo; process(); } if($_ eq "bar") { use Bar; process(); } ... } 每个包含的模块有点类似,唯一的区别是process() – sub的作用. #!/usr/bin/perl -w[详细]
-
perl – 如何在Mojolicious中测试重定向？
所属栏目：[大数据] 日期：2020-12-16 热度：133
我想测试一个带有表单的页面,该表单在提交时将重定向到提交项目的结果页面. 我的Mojolicious控制器包含： sub submit_new { my $self = shift; my $new = $self-db-resultset('Item')-new( { title = $self-param('title'),description = $self-param('descr[详细]
-
perl – 由于某种原因无法在Carp :: croak()中禁用堆栈跟踪
所属栏目：[大数据] 日期：2020-12-16 热度：117
根据Carp模块文档,croak()不应产生任何堆栈跟踪,除非$Carp :: Verbose的计算结果为true.但是对于某些原因,croak()在我的环境中总是表现得像confess(),即总是打印堆栈跟踪,即使它不应该… 这是一个测试脚本： #!/usr/bin/perluse Modern::Perl;use Carp;sub f[详细]
-
是否有像perl的Regexp :: Grammars或.NET中标记的子模式？
所属栏目：[大数据] 日期：2020-12-16 热度：62
我非常喜欢perl的 Regexp::Grammars模块. .NET有这样的东西吗？ 我真的想在C#中以正则表达式的方式使用递归下降解析器(例如,通过大文档搜索匹配的模式),并且能够递归地表达该模式. 更新从brian d foy读取此little gem之后,我发现perl 5.10支持使用(？ NAME)[详细]
-
使用Perl的LWP时,是否可以根据`Content-Type`中止HTTP请求？
所属栏目：[大数据] 日期：2020-12-16 热度：132
我希望我的脚本只下载文本/ html内容,而不是二进制文件或可能需要更多时间下载的图像.我知道 max_size参数,但我想在Content-Type标头上添加一个检查.这可行吗？ 解决方法 正如其他人所指出的,您可以在GET请求之前执行HEAD请求.你应该这样做是为了对服务器礼[详细]
-
perl – 模板工具包包括钩子？
所属栏目：[大数据] 日期：2020-12-16 热度：140
是否存在某种类型的钩子,当我包含模板并且我可以在其中更改模板的路径时将执行该钩子？ 例如 [% INCLUDE test %] 我想将’test’的路径改为’AE / test.tt’或’FR / test.tt’. 我们的想法是更改模板的路径,而不更改包含所在的模板. 解决方法 执行此操作的[详细]
-
Perl UTF8编码错误. LWP :: UserAgent-> decoding_content或E
所属栏目：[大数据] 日期：2020-12-16 热度：89
当我尝试使用LWP :: Useragent和Encode进行字符编码从网页中撤回全局地址时,我在perl中存在编码问题.我试过谷歌搜索解决方案,但似乎没有任何工作.我正在使用Strawberry Perl 5.12.3. 以美国驻捷克共和国大使馆的地址页为例(http://prague.usembassy.gov/cont[详细]
-
数组 – 如何在Perl中序列化数组引用数组？
所属栏目：[大数据] 日期：2020-12-16 热度：195
有很多模块可以为Perl序列化数据,我不知道选择哪一个. 我有以下数据需要序列化为字符串,所以我可以把它放在数据库中： my @categories = ( ["Education","Higher Education","Colleges"],["Schooling","Colleges"]); 我怎么能把它变成文本,然后当我需要它时,[详细]
-
数组 – 将数组匹配到引用数组中的值 – Perl
所属栏目：[大数据] 日期：2020-12-16 热度：158
我有以下数组引用数组： my @holidays = [[2012,'01','02'],[2012,'16'],'02','20'],'04','05','28'],'07','04'],'09','03'],'10','08'],'11','12'],'22'],'12','25']]; 这是IRS在2012年认可的法定假日.我想将数组@dueDate与该数组中的值匹配,如果存在,则返[详细]
-
perl – 是否可以使用Dist :: Zilla的可选依赖项？
所属栏目：[大数据] 日期：2020-12-16 热度：109
我想让 Dist::Zilla可选的一些我的依赖项检测到.我怎么能这样做？ 解决方法 Dist::Zilla::Plugin::Prereqs文档说您可以将它们定义为： [Prereqs / RuntimeRecommends]Some::Optional::Module = 0 虽然apparently虽然没有得到普通客户的支持(或者至少去年夏天[详细]
-
‘* {}’似乎是一个有效的Perl5解除引用运算符(perldoc：overloa
所属栏目：[大数据] 日期：2020-12-16 热度：69
在阅读关于Perl5的pragma重载时,我注意到了运算符 *{} . 我想知道什么样的sigil *,如果有的话,或者在ref上下文中*的含义是什么. 解决方法 * foo是一个“typeglob”,或简称为“glob”. glob是一个结构(如在C结构中),其字段名为ARRAY,HASH,IO等.这些字段不包含[详细]
-
在Perl中规范化Unicode字符串
所属栏目：[大数据] 日期：2020-12-16 热度：122
我想将一些来自UTF-8数据库的文本输出到CP1252(又名Latin1)中的文件.为此,我使用Text :: Iconv工作正常,除非要转换的字符串中的字符被分解.这是否是iconv库的失败是我提出的一个问题,答案并不明显.由于iconv在组合字符上工作正常,因此解决方案是首先规范化我[详细]
-
带有条件的Perl XPath语句 – 可能吗？
所属栏目：[大数据] 日期：2020-12-16 热度：182
这个问题已被重新定义.我使用CPAN Perl模块 WWW::Mechanize来浏览网站,使用 HTML::TreeBuilder-XPath来捕获内容,使用 xacobeo来测试我的HTML / XML上的XPath代码.目标是从基于PHP的网站调用此Perl脚本,并将已删除的内容上载到数据库中.因此,如果内容“缺失”[详细]
-
perl – 如何使用SHA256创建密钥,值对和秘密签名的标记？
所属栏目：[大数据] 日期：2020-12-16 热度：135
我想在这些隐藏字段的键值对的sha编码字符串的帮助下验证一些隐藏的输入字段(以确保它们在提交时未被更改).我在网上看到了这个例子,但我不明白如何编码和 使用动态秘密值解码值.有人可以帮我理解如何在perl中执行此操作吗？ 哪种签名类型(MD5,SHA1,SHA256等)[详细]
-
如何在perl中将字符串转换为json
所属栏目：[大数据] 日期：2020-12-16 热度：122
我是perl的新手,所以请帮助我以下 我有一个perl脚本来执行telnet命令.此脚本从服务器接收响应字符串.实际上,服务器创建一个json字符串,然后它发送到客户端程序,但客户端程序将其显示为字符串 问题：如何将此字符串转换为json并从此json字符串中读取数据. 我[详细]
-
perl – 打开通过$_命令行提供的文件名是否存在问题？
所属栏目：[大数据] 日期：2020-12-16 热度：108
我无法修改处理作为命令行参数传递的文件的脚本,仅用于复制这些文件,另外修改这些文件.以下perl脚本适用于复制文件： use strict;use warnings;use File::Copy;foreach $_ (@ARGV) { my $orig = $_; (my $copy = $orig) =~ s/.js$/_extjs4.js/; copy($orig[详细]
-
你如何破译Perl的Benchmark :: timestr的输出？
所属栏目：[大数据] 日期：2020-12-16 热度：109
我正在使用 Benchmark,输出： 1个wallclock secs(0.22 usr 0.00 sys = 0.22 CPU)@ 4545454.55 / s(n = 1000000) 任何人都可以用更详细的方式解释上面的每个数字吗？ 解决方法 1 wallclock secs 运行基准测试需要1秒的实时时间. 0.22 usr 在用户模式下CPU上0.[详细]
-
FindBin用于驻留在我脚本目录中的perl模块
所属栏目：[大数据] 日期：2020-12-16 热度：74
我有一个脚本,它使用标准Perl库外部的模块,并希望以某种方式使用它们.我没有权限将它们安装到Perl lib目录中,并且想知道我是否可以将这些外部模块驻留在我的脚本目录中. 我已经阅读了有关使用FindBin的内容,但似乎无效.我正确使用它吗？ 现在我想使用我想要[详细]
