Subject: | String::Diff::diff-0.02 invalid handling of zeros |
Date: | Thu, 19 Apr 2007 13:31:05 -0400 |
To: | bug-String-Diff [...] rt.cpan.org |
From: | "Michael Bautin" <mbautin [...] gmail.com> |
I am using String::Diff-0.02.
The command
perl -e 'use String::Diff; print join(", ", String::Diff::diff("10",
"12"))."\n"; '
outputs
1, 1{2}
which should have been
1[0], 1{2}
On the other hand, if I replace 0 with 3, I get:
perl -e 'use String::Diff; print join(", ", String::Diff::diff("13",
"12"))."\n"; '
1[3], 1{2}
So I suppose this is something related to boolean evaluation of zeros.
Mikhail Bautin
mbautin(*at*)cs(*dot*)sunysb(*dot*)edu