Perl use 函数
描述
此函数将 MODULE 导出的所有函数或仅 LIST 引用的函数导入当前包的名称空间。 等效于 −
BEGIN { require "Module.pm"; Module->import(); }
也用于在当前脚本上强加编译器指令(pragma),尽管本质上这些只是模块。
请注意,use 语句是在编译时评估的。 在执行时评估 require 语句。
如果 VERSION 参数存在于 Module 和 LIST 之间,则用户将调用 Module 类中的 VERSION 方法,并将给定版本作为参数。 默认的 VERSION 方法,继承自 UNIVERSAL 类。
语法
以下是此函数的简单语法 −
use MODULE LIST use MODULE use VERSION
返回值
此函数不返回任何值。
示例
以下是显示其基本用法的示例代码 −
use constant; use diagnostics; use integer; use sigtrap qw(SEGV BUS); use strict qw(subs vars refs); use subs qw(afunc blurfl); use warnings qw(all); use sort qw(stable _quicksort _mergesort); use v5.6.1; # compile time version check use 5.6.1; # ditto use 5.006_001; # ditto