in reply to Re: string diff and compare
in thread string diff and compare

Thanks jw!

I fixed the errors (my internet machine, and my Perl are on two different systems, and I copied it by hand...).

The optimizations are really interesting (still pondering it in awe...), I didn't know about @+ til this example. That makes matching strings so much better than having to pull them appart into seperate character arrays. The trick of using negative subscripts is really cool too. Thanks for taking the time to respond, it's little things like this that makes Perl a pure expression of algorithmic joy... :-D

Replies are listed 'Best First'.
Re^3: string diff and compare
by jwkrahn (Abbot) on May 04, 2012 at 21:22 UTC 
    I fixed the errors

    [download]

    Except for this one: 

      my $longer = (@cold > @new) ? $#cold : $#new;

    [download]

    Which should be: 

      my $longer = (@cold > @cnew) ? $#cold : $#cnew;

    [download]
[reply]
[d/l]
[select]

In Section Meditations