package A::B;

use Carp;
use strict;
use warnings;

sub sub_b {
    Carp::cluck '...';
    };

    1;