这是CPAN Uniq模块中的错误吗？

use Uniq;

my @test1 = ("0","0","A");
my @test2 = ("1","1","A");

@test1 = uniq sort @test1;
@test2 = uniq sort @test2;

print "$_" for @test1;
print "\n";
print "$_" for @test2;
print "\n";
use Uniq;

my @test1 = ("0","0","A");
my @test2