你可以在 Perl 程序中定义任意数量的名为 BEGIN 和 END 的代码块,它们分别充当构造函数和析构函数。BEGIN { ... } END { ... } BEGIN { ... } END { ... }每个 BEGIN 块在 perl 脚本加载并编译后但执行任何其他语句之前执行。每个 END 块在 perl 解释器退出之前执行。BEGIN 和 END 块在创建 Perl 模块时特别有用。以下示例显示了它的用法:示例实时演示#!/usr/bin/perl package Foo; print "Begin and Block Demo"; BEGIN { print "This is BEGIN Block" } END { … 阅读更多