On Wed, Apr 21, 2004 at 09:44:54AM +0200, Xavier Noria <[EMAIL PROTECTED]> wrote: > Good. With a little modification we get 26 if this is right: > > $_=$x^$y;$n=$-[0]if/[^\0]/
$x = "abc"; $y = "abc\0\0\0"; gives undef instead of the required 3 On Wed, Apr 21, 2004 at 07:48:57AM +0200, Xavier Noria <[EMAIL PROTECTED]> wrote: > > {$x ne$y&&$x=~/./sg&$y=~/\G$&/g&&redo;$n=$-[0]} Needs a \Q after the \G. (Consider $x = "a.c" and $y = "abcdef" or $x = "a+c" and $y = "a+cd".)