On Thu, 2003-09-04 at 12:24, [EMAIL PROTECTED] wrote: > Can someone please explain why this > > while (1) { > my $item = <STDIN>; > chomp $item; > last unless $item; > $inventory{1c $item}++; > }
You probably wanted: $inventory{'1c'}++; or $inventory{$item}++; HTH, -- K Old <[EMAIL PROTECTED]> -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]