perl – 如何在lib路径中使用变量？

我想在lib路径中使用$var变量.

我的$var =“/ home /usr/bibfile;”

使用lib“$var / lib /”;

但是当我这样做时会抛出一个错误.

我想使用lib“$var / lib /”;而不是使用lib“/ home /usr/bibfile / lib /”;.

如何分配一个变量,以便它可以在lib模块的设置中使用？

解决方法

首先,你有一个简单的语法错误 – 你缺少;第一行后.我的变量应该在使用lib中工作正常.

但是,由于所有使用指令都在BEGIN块中执行,您的变量将在运行使用时被初始化,因此您需要将初始化设置为BEGIN块.

my $var;
BEGIN { $var = "/home/usr/bibfile"; }
use lib "$var/lib/";

use Data::Dumper;
print Dumper \@INC;

得到：

$VAR1 = [
      '/home/usr/bibfile/lib/',# ... more ...
    ];