package My::Test;

use strict;
use warnings;

use Carp;

sub import
{
	my $class = shift;
    croak "Number of import parameters is wrong, stopped " unless @_ == 3;
    # ...
}

1;