我的 上一个问题 已经解决了我的问题，但让我缺乏理解。
use 5.014;
use warnings;
use Test::More;
# still has carp after no Carp
package Test0 {
use Carp qw( carp );
sub new {
my $class = shift;
my $self = {};
carp 'good';
bless $self, $class;
return $self;
}
no Carp;
}
my $t0 = Test0->new;
ok( ! $t0->can('carp'), 'cannot carp');
这个测试没有通过，这意味着 no ... 不做我认为它做的事情，包括不重要的符号。我读了 perldoc no，但它似乎确实相当令人失望。鉴于此代码的结果，我会说它并没有完全按照它所宣传的那样做。
是什么 no 做？何时以及为何要使用它？