my @unique = map
             { ! $seen{ $_->[1] }++ 
               ? [ @{ $_ } ]
               : ()
             }
             @array;