RE: [MacPerl-Modules] More about Tie::SubstrHash in MacPerl

["Sen, Marcus A" <mase@bgs.ac.uk>]

I tried the first sample code on ActiveState perl 5.6 for Windows and perl
5.004 on irix.  Both failed; i.e. with the use Tie::SubstrHash and tie
statements in the only output was hashsize=0 whereas deleting these lines
gave the expected output.  Thus I guess this is not a MacPerl specific
issue.

Marcus Sen

(I am only subscribed to macperl-modules list so apologise if this is
repeating something already posted on the perlbug list.)

-----Original Message-----
From: Linc Madison [mailto:LincPerl@LincMad.com]
...
As to whether or not it's a bug, there is clearly a bug in 
Tie::SubstrHash as implemented in MacPerl 5.20r4, in some respect. I 
consider that established. I therefore don't see why this would be in 
any way inappropriate for perlbug.

This sample code fails:
#----------------
#! /usr/local/bin/perl5

use Tie::SubstrHash;

tie %test, "Tie::SubstrHash", 13, 86, 1;

$test{abcdefg000001} = ("abcde" x 17) . "1";

$j = scalar(keys %test);
print "hashsize = $j\n";	# should print:  hashsize = 1
print %test;			# should print:  abcdefg000001abcde...abcde1
#----------------

How can that be anything other than a bug?
...
As to whether this bug lies with Perl or MacPerl, I leave that to 
others to determine.

==== Want to unsubscribe from this list?
==== Send mail with body "unsubscribe" to macperl-modules-request@macperl.org