my @non_unique = qw/carpet car pet/; # fails on 'car' and 'pet' my @non_unique = ("bob and sue","bob"); # fails on space seperated words