perl - 在 @INC 中找不到 ***

Question

我在~/.local/perl5中安装perl模块。这是~/.bashrc的一部分:

export PERL_LOCAL_LIB_ROOT="$HOME/.local/perl5";
export PERL_MB_OPT="--install_base $HOME/.local/perl5";
export PERL_MM_OPT="INSTALL_BASE=$HOME/.local/perl5";
export PERL5LIB="$HOME/.local/perl5/lib/perl5:$PERL5LIB";
export PATH="$HOME/.local/perl5/bin:$PATH";

我已经安装了 CSS::Inliner

$ cpan
cpan[1]> install CSS::Inliner

我有 Inliner.pm 位于:

~/.local/perl5/lib/perl5/CSS/Inliner.pm

但是当我使用它时——perl找不到它:

perl -e 'use Inliner'

给出:

Can't locate Inliner.pm in @INC (@INC contains:
/home/boris/.local/perl5/lib/perl5/x86_64-linux-gnu-thread-multi
/home/boris/.local/perl5/lib/perl5 /etc/perl
/usr/local/lib/perl/5.14.2 /usr/local/share/perl/5.14.2 /usr/lib/perl5
/usr/share/perl5 /usr/lib/perl/5.14 /usr/share/perl/5.14
/usr/local/lib/site_perl .) at -e line 1. BEGIN failed--compilation
aborted at -e line 1.

为什么perl找不到模块？

编辑:

我正在尝试重现 CSS-Inliner 文档中给出的最小工作示例:

use Inliner;

my $inliner = new Inliner();

$inliner->read_file({filename => 'myfile.html'});

print $inliner->inlinify();

如果我使用 Inliner——perl 找不到它。如果我

#!/usr/bin/perl

use CSS::Inliner;

my $inliner = new Inliner();

$inliner->read_file({filename => 'test.html'});

print $inliner->inlinify();

perl 说

Can't locate object method "new" via package "Inliner"
(perhaps you forgot to load "Inliner"?) at ./1.perl line 5.

编辑 2:

这是 CSS-Inliner 的最小工作示例:

#!/usr/bin/perl

use CSS::Inliner;

my $inliner = CSS::Inliner->new;

$inliner->read_file({filename => 'test.html'});

print $inliner->inlinify();

Answer 1

您应该在use中使用完整的模块名称，并在调用类方法时使用完整的类名称:

use CSS::Inliner;
my $inliner = CSS::Inliner->new;