Jerry D. Hedden wrote: > The test suite for DBM_Filter is hard-coded to use > SDBM_File, and hence fails if SDBM_File is not built. > That attached patch lets testing proceed by using any > *DBM_File (or DB_File) that is found. Andy Dougherty wrote: > Would this work if you just used AnyDBM_File instead of > SDBM_File? My patch works, but when I tried replacing instances of SDBM_File with AnyDBM_File, I got errors: > ./perl.exe -Ilib lib/DBM_Filter/t/compress.t 1..23 ok 1 - use DBM_Filter; ok 2 - use AnyDBM_File; ok 3 - use Fcntl; ok 4 - use Compress::Zlib; ok 5 - tied to AnyDBM_File ok 6 - StoreData called from lib/DBM_Filter/t/compress.t, line 34 ok 7 - Store Data is a hash reference ok 8 - Storing to tied hash ok 9 - VerifyData called from lib/DBM_Filter/t/compress.t, line 45 ok 10 - Expected data is a hash reference ok 11 - Verifying a tied hash ok 12 - Expected == Actual Use of uninitialized value in string ne at lib/DBM_Filter.pm line 184. ok 13 - push a 'compress' filter ok 14 - StoreData called from lib/DBM_Filter/t/compress.t, line 62 ok 15 - Store Data is a hash reference ok 16 - Storing to tied hash Use of uninitialized value $Tie::Hash::origDESTROY{"AnyDBM_File"} in subroutine entry at lib/DBM_Filter.pm line 219. (in cleanup) Can't use string ("") as a subroutine ref while "strict refs" in use at lib/DBM_Filter.pm line 219. ok 17 - untie without inner references not ok 18 - tied to AnyDBM_File # Failed test 'tied to AnyDBM_File' # at lib/DBM_Filter/t/compress.t line 85. ok 19 - VerifyData called from lib/DBM_Filter/t/compress.t, line 87 ok 20 - Expected data is a hash reference not ok 21 - Verifying a tied hash # Failed test 'Verifying a tied hash' # at lib/dbm_filter_util.pl line 33. not ok 22 - Expected == Actual # Failed test 'Expected == Actual' # at lib/dbm_filter_util.pl line 48. # Expected does not match actual # No Match from Expected: # 'Beta' => 'beta' # 'x�c`' => 'x�c�' # 'x�KLJM'' => 'x�KI5)�' # '22' => '88' # 'alpha' => 'Alpha' # 'x�322' => 'x�311' # 'x�310/�' => 'x�3502�' # '-45' => '-88' # 'x�' => 'x�' # '1234' => '5678' # 'fred' => 'Joe' # '-3' => '-5' # 'x�311' => 'x�322' # ok 23 - untie without inner references # Looks like you failed 3 tests of 23. ____________________________________________________________________________________ It's here! Your new message! Get new email alerts with the free Yahoo! Toolbar. http://tools.search.yahoo.com/toolbar/features/mail/Thread Previous | Thread Next