K Old said: > 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}++;
or more likely: $inventory{lc $item}++; That is the letter L rather than the number ONE. lc for lowercase. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]