From perlod ...
And, read map chain as: map { scalar( reverse $_ ) } ( $old , $new ).
In reply to Re^3: string diff and compare by Anonymous Monk in thread string diff and compare by raybies