package Utils;

...;
use List::MoreUtils ();  # note empty optional import list
...;

...;

sub uniq {
    my $self   = shift;
    # fully qualify List::MoreUtils function
    my @result = List::MoreUtils::uniq @{ $self->list };
    wantarray ? @result : scalar @result;
    }

...

1;

# And the script:

...
use Karl;
...

...
my $uniq = $nose->uniq;
...