Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl: the Markov chain saw
 
PerlMonks  

Re^3: How do i do a direct comparison of an array of strings?

by gone2015 (Deacon)
on Feb 20, 2009 at 01:13 UTC ( [id://745248] : note . print w/replies, xml ) Need Help??


in reply to Re^2: How do i do a direct comparison of an array of strings?
in thread How do i do a direct comparison of an array of strings?

Or even:

sub differing_positions { my @c = unpack('C*', $_[0] ^ $_[1]) ; return grep $c[$_], (0..$#c) ; }

Replies are listed 'Best First'.
Re^4: How do i do a direct comparison of an array of strings?
by AnomalousMonk (Archbishop) on Feb 20, 2009 at 11:36 UTC