Tag: perl

我应该使用\ d还是匹配Perl正则expression式中的数字？: 在过去几个星期阅读了一些问题/答案之后，我发现在perl正则expression式中使用\d是不正确的。由于perl \d的后面版本与[0-9] ，因为\d将表示具有数字属性的任何Unicode字符，并且[0-9]表示字符'0'，'1 '，'2'，…，'9'。我明白，在某些情况下[0-9]是正确的使用方法，而在其他情况下则是。我想知道哪些人觉得是正确的默认使用？就我个人而言，我发现\d符号非常简洁和expression，而比较[0-9]则有些麻烦。但是我很less有多语言代码的经验，或者说编码不符合ASCII字符范围的语言，因此可能太天真了。我注意到 $find /System/Library/Perl/5.8.8/ -name \*pm | xargs grep '\\d' | wc -l 298 $find /System/Library/Perl/5.8.8/ -name \*pm | xargs grep '\[0-9\]' | wc -l 26

如何在Perl中将date/时间转换为纪元时间（又名unix time – 1970年以来的秒数）？: 给定date/时间作为（年，月，日，时，分，秒）数组，将如何将其转换为纪元时间，即自1970-01-01 00:00:00 GMT以来的秒数？奖金问题：如果将date/时间作为一个string给出，您将如何首先将其parsing为（y，m，d，h，m，s）数组？

我怎样才能在Perl中unbless一个对象？: 来自perldoc -f保佑： bless REF,CLASSNAME 这个函数告诉REF现在引用的东西 CLASSNAME包中的一个对象。没有不必要的复制，有没有办法获得一个没有结构的结构？

Perl开发的IDE最重要的特性是什么？: 正如你们中的一些人可能知道我是Perl IDE的主要开发人员Padre 。在开发的第一年，Padre成为了一个可以接受的文本编辑器，并且有一些额外的Perl开发特性。我想问一下堆栈溢出社区的一些帮助，进一步推动这个项目变成一个特殊的IDE开发Perl。所以我很高兴看到你认为什么是Padre仍然缺less的IDE最重要的特性？特别是对于那些目前使用Eclipse + EPIC ， Komodo ，Visual Studio或者程序员的任何文本编辑器的人，我会感兴趣的。

匹配正则expression式，并在单行代码中分配结果: 我想能够在variables上执行正则expression式匹配，并将结果赋给variables本身。什么是最好的办法呢？我想在一行代码中将第2行和第3行结合起来： $variable = "some string"; $variable =~ /(find something).*/; $variable = $1; 有没有更简单的方法来做到这一点？我错过了什么吗？

在Perl 5中，如何获得发送信号的进程的PID？: 在C中，我可以说 #include <stdio.h> #include <unistd.h> #include <signal.h> int continue_running = 1; void handler(int signal, siginfo_t* info, void* data) { printf("got signal %d from process %d running as user %d\n", signal, info->si_pid, info->si_uid); continue_running = 0; } int main(int argc, char** argv) { struct sigaction sa; sigset_t mask; sigemptyset(&mask); sa.sa_sigaction = &handler; sa.sa_mask = mask; sa.sa_flags […]

有更好的方法来确定在Perl中花费的时间？: my $start_time = [Time::HiRes::gettimeofday()]; my $diff = Time::HiRes::tv_interval($start_time); print "\n\n$diff\n";

如何获取正在运行的Perl脚本的名称: 我怎样才能得到脚本的名字？例如，我有一个名为XXX.pl的Perl脚本。这个文件包含： $name = #some function that obtains the script's own name print $name; 输出： XXX.pl 我想把它比作获得脚本目录的CWD函数。我需要一个获取脚本名称的函数。