| Subject: | Can't modify string in character translation |
Running 'make test' under perl 5.005_03, I found this error:
--cut--
t/01_Config-Auto....Can't modify string in character translation at
blib/lib/Config/Auto.pm line 122, near "tr/;//) "
BEGIN failed--compilation aborted at t/01_Config-Auto.t line 10.
dubious
--cut--
This seems to be caused by a bug in Auto.pm (patch attached).
This bug would also manifest itself under newer perls, but since the particular code lines are not exercised by the test cases, this is not revealed.
--- lib/Config/Auto.pm.orig Sat Feb 21 12:39:16 2004
+++ lib/Config/Auto.pm Sat Feb 21 12:40:02 2004
@@ -120,8 +120,8 @@
# Some general sanity checks
if (exists $score{perl}) {
- $score{perl} /= 2 unless ("@$data_r" =~ tr/;//) > 3 or $#$data_r < 3;
- delete $score{perl} unless ("@$data_r" =~ tr/;//);
+ $score{perl} /= 2 unless ("@$data_r" =~ /;/) > 3 or $#$data_r < 3;
+ delete $score{perl} unless ("@$data_r" =~ /;/);
delete $score{perl} unless ("@$data_r" =~ /([\$\@\%]\w+)/);
}