Rethink your technique, you may find HASH structure more suitable:

my @a = ("bob", "bob", "martha", "bob");
my %a;

@a{@a} = ();

print keys %a;
[download]