perl - Perl BEGIN block 会传播病毒或丢失数据吗？

Question

我还是 Perl 的新手。由于BEGIN编译过程中运行 block 简单编译不会导致病毒传播或数据丢失吗？ Perl 会做些什么来阻止它吗？如果是这样，是否意味着 BEGIN 中的代码？ block 之外的行为可能会有所不同？

Answer 1

是的所有这些问题。 Eclipse IDE 易受此攻击。它discussed in more detail here .

与所有软件一样，您应该避免从您不信任的来源下载和运行任何软件。 CPAN 通常是值得信赖的；虽然我不知道有人故意向 CPAN 发布恶意代码，但它可能已经发生了。

您可以使用 $^C flag 避免在编译检查期间运行代码，例如:

BEGIN { load_data_from_db() unless $^C; }