AGH! I am irritating myself and the list with my massive list of attempts, but I think this is it: 123456789_123456789_123456789_123456789_123456789_1234567 ^.*(??{$&eq'^.*(??{'.substr($&,7,41).'})\z'?'':'(?!)'})\z -- Jeff "japhy" Pinyan japhy@pobox.com http://www.pobox.com/~japhy/ Are you a Monk? http://www.perlmonks.com/ http://forums.perlguru.com/ Perl Programmer at RiskMetrics Group, Inc. http://www.riskmetrics.com/ Acacia Fraternity, Rensselaer Chapter. Brother #734 ** I need a publisher for my book "Learning Perl's Regular Expressions" ** ==== Want to unsubscribe from Fun With Perl? Well, if you insist... ==== Send email to <fwp-request@technofile.org> with message _body_ ==== unsubscribe