Tag: perl

如何从Perl中的数组中删除重复的项目？

我在Perl中有一个数组： my @my_array = ("one","two","three","two","three"); 如何从数组中删除重复项？

什么时候应该使用＆来调用一个Perl子程序？

我听说，人们不应该使用&来调用Perl subs，即： function($a,$b,…); # opposed to &function($a,$b,…); 我知道一个参数列表变成可选的，但是有些情况下适合使用&和你绝对不应该使用的情况？ 另外，如果省略“ & ”，那么性能增加如何发挥作用？

为什么我的文件内容/用户input不匹配？ （缺lesschomp规范）

我正在读取一个文件/ STDIN并寻找一个特定的值： use strict; use warnings; my $find = 'def'; while (<DATA>) { if ($_ eq $find) { print "Found: $_\n"; # Never reached! } } __DATA__ abc def xyz 为什么从来没有匹配的条件？

匹配空格而不是换行符

我有时想匹配空白，但不是换行符。 到目前为止，我一直在诉诸于[ \t] 。 有没有一个尴尬的方式？

Perl守护进程守护进程

我必须在我的代码中使用守护进程。 我需要一个控制守护进程，不断地检查数据库的任务，并监督子守护进程。 控制守护进程必须将任务分配给子守护进程，控制任务，如果其中一个死亡，则创build新的subprocess等等。子守护进程会检查数据库中的任务（通过PID）。 我应该如何实现这个目的的守护进程？

如何在Perl中使用布尔variables？

我努力了： $var = false; $var = FALSE; $var = False; 这些都没有工作。 我收到错误消息 当“严格的潜艇”被使用时，不允许使用“伪”字。

我如何在没有root权限的情况下安装Perl模块？

我在一台没有root权限的Linux机器上。 我想通过CPAN将一些软件包安装到我的主目录中，以便在运行Perl时能够看到它。 我跑了cpan ，要求一些configuration选项。 它询问了一些目录，它提示~/perl为非root用户。 不过，当我尝试安装一个软件包时，在make install步骤中会失败，因为我没有对/usr/lib/perl5/whatever写权限。 我怎样才能configurationCPAN，使我可以安装软件包到我的主目录？

Perl的@INC是如何构build的？ （又名什么是影响Perl模块search的方法？

影响Perl模块search的所有方法是什么？ 或者， Perl的@INC是如何构build的 ？ 我们知道， Perl使用包含目录名的@INC数组来确定在哪里searchPerl模块文件 。 在StackOverflow中似乎没有全面的“@INC”常见问题解答types的post，所以这个问题是作为一个。

为什么Perl不能find我在ClearCase中的文件？

这段Perl告诉我，ClearCase中的文件不存在， $x = "PATH/TO/FILE" if (-e $x) { print "This file exists on the file system"; } else { print "I can't see this file"; } 有没有人见过这个？ 一些文件返回正常。 让我难住。 Clearcase视图是dynamic的，托pipe在unix上。 这段代码返回一个文件存在，而另一个不在同一个视图中的同一个文件夹中。

为什么使用自动化文件句柄的三参数公开调用是Perl的最佳实践？

我有两个关于Perl open函数的问题： 1）我似乎记得从Perl的最佳实践 ，3参数版本的open比两个参数版本更好，例如 open(OUT, '>>', $file); 与 open(OUT, ">>$file"); 这是为什么？ 有一天我试着告诉某人使用3个参数的版本，但似乎没有任何支持。 2）我似乎还记得autovivified文件句柄在裸文件句柄（他们称为不同的东西）青睐？ 也不记得为什么，例如 open(my $out, '>>', $file); 与 open(OUT, '>>', $file); 这是一个strict事情吗？ 我似乎记得能够strict使用OUT ，但我不记得了。