LPM: Banging head against wall

[Rich Bowen]

I've been banging my head on something for a while, and I'm sure I'm
looking right at the problem and not seeing it. Any assistance greatly
appreciated.

I've got a comma-delimited thingy, and I'm munging it into a hash like
...

	my %hash =  map {$_ => 1} (split /,/ ,$string);

But when I print keys(%hash), instead of getting a list of stuff that
was in $string, I'm getting 32, which is the number if items that was in
$string.

I assume I'm doing something boneheaded, but I can't yet figure it out,
which is why I assume it's simple, and someone will catch it right away.
I really don't feel like spending the afternoon staring at debug prints.

Thanks for any pointers you can offer.

Rich
-- 
http://www.ApacheUnleashed.com/
Lexington Perl Mongers - http://lexington.pm.org/
PGP Key - http://www.rcbowen.com/pgp.txt