perl - 在我的方法中使用 __PACKAGE__ 是否不利于继承？

Question

如果在我的代码中，我会调用如下:

__PACKAGE__->method;

如果这个模块是继承的，这会限制这个模块的可用性吗？

Answer 1

这取决于你想做什么:

#!/usr/bin/perl

package A;

use strict; use warnings;

sub new { bless {} => $_[0] }

sub method1 {
    printf "Hello from: %s\n", __PACKAGE__;
}

sub method2 {
    my $self = shift;
    printf "Hello from: %s\n", ref($self);
}

package B;

use strict; use warnings;
use parent 'A';

package main;

my $b = B->new;

$b->method1;
$b->method2;

输出:

你好来自:A
你好来自:B