>>>>> "Kenneth" == Kenneth Singleton <[EMAIL PROTECTED]> writes:
Kenneth> Yes, I know this should be very easy. Yes I've seen the Kenneth> exercise in "Learning Perl". Still I can't get the darned Kenneth> thing to work. Please help me. What have you tried? Does this example help? my %lastname; while (<DATA>) { chomp; my ($key, $value) = split; print "setting \$lastname{'$key'} to '$value'\n"; $lastname{$key} = $value; } foreach $key (sort keys %lastname) { print "$key has a last name of $lastname{$key}\n"; } __END__ Fred Flintstone Barney Rubble Betty Rubble Wilma Flintstone Dino -- Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095 <[EMAIL PROTECTED]> <URL:http://www.stonehenge.com/merlyn/> Perl/Unix/security consulting, Technical writing, Comedy, etc. etc. See PerlTraining.Stonehenge.com for onsite and open-enrollment Perl training! -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]