Re^2: How to use a negative backreference in regex?

[larryk]

thanks - it's been a while :)

I eventually ended up with the following:

my $unique = qr/^(.)(?!\1)
                 (.)(?!\1|\2)
                 (.)(?!\1|\2|\3)
                  .$/x;