Madison Daily <[EMAIL PROTECTED]> wrote: : Can someone please explain why this : : while (1) { : my $item = <STDIN>; : chomp $item; : last unless $item; : $inventory{1c $item}++; : } : : : Gets Bare word found where operator expected : Syntax error line 13 near 1c
Chances are that "1c" is a typo and should be "lc" the perl lowercase function. HTH, Charles K. Clarkson -- Head Bottle Washer, Clarkson Energy Homes, Inc. Mobile Home Specialists 254 968-8328 -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]