小编Lea*_*ing的帖子

你怎么理解这里的诀窍?

my $self; { my %hash; $self = bless(\%hash, $pkg); }
Run Code Online (Sandbox Code Playgroud)

它引用了HTML/Template.pm,为什么不简单bless $self,$pkg

perl

5
推荐指数
1
解决办法
206
查看次数

在Perl中,有没有办法在引号内做简单的算术运算?

$i = 5;
print "{$i*10}";
Run Code Online (Sandbox Code Playgroud)

有时我可能需要做上面这样的事情,但是Perl没有按照我想要的方式解释它,而且我只能用另一个变量来做.有一个技巧吗?

perl

4
推荐指数
2
解决办法
1030
查看次数

每个人的意外行为

%h = (a => 1, b => 2);

keys %h;
while(my($k, $v) = each %h)
{
  $h{uc $k} = $h{$k} * 2; # BAD IDEA!
}
Run Code Online (Sandbox Code Playgroud)

输出是:

(a => 1, A => 2, b => 2, B => 8)
Run Code Online (Sandbox Code Playgroud)

代替

(a => 1, A => 2, b => 2, B => 4)
Run Code Online (Sandbox Code Playgroud)

为什么?

perl

2
推荐指数
1
解决办法
114
查看次数

Perl模块(.pm)如何调用相应的.so?

我刚刚编译并运行了一个hello world Perl扩展,但我不知道原理.如何.pm调用.so

perl

1
推荐指数
1
解决办法
1011
查看次数

为什么Perl在丢失时不提供标题?

如果我忘记打印标题,将在Perl中出现这样的错误:

 Premature end of script headers
Run Code Online (Sandbox Code Playgroud)

但是在PHP中,如果我不打印任何标题,那么Perl为什么不自动执行呢?

perl

0
推荐指数
1
解决办法
124
查看次数

标签 统计

perl ×5