Ed Sickafus wrote:
foreach $keyouter(sort keys %dbm) {
foreach $keyinner(keys %{$dbm{$keyouter}}){
If ($dbm{$keyouter}{$keyinner} == "LN")
{
print "localtime($dbm{$keyouter}) \t
Last Name = $dbm{$keyouter}{$keyinner}\n";
} ### <--- Line 69
else
{
print "\t\t
In need of help again, haven't been able to get past 2 syntax error mssgs:
Made a number of changes in my script and now can't even get it to compile:
relevant snippet follows the error mssgs, then the whole script is shown
further down.
Error Mssgs.
1. syntax error at clientdata.cgi line 71, nea
My thanks to: Wiggins, Dave, Dennis, Murlidharan and the rest of this
wonderful culture:
Answers to your questions and report on progress.
A form on my web site will invite visitors to register for a free ebook on a
new problem-solving methodology. (You'll get a laugh out of this (my wife
does)
Dave K wrote:
Ed,
A 'cleaner' approach.
The central (as opposed to key) point:
In the expression:
$hash{$ohk}->{$ihk}
$hash{$ohk} is the _value_ of a hash, but that _value_ is a reference to a
hash,
so we can use the '->' syntax. Think of:
$hash{$ohk}->
as identifying that (pesky anonymous)
Ed,
A 'cleaner' approach.
#!/usr/bin/perl -w
use strict;
my %hash = (
fruits => {
favorite => "apples",
'second favorite' => "oranges",
},
vegetables => {
favorite => "corn",
'second favorite' => "peas",
'least favorite' => "turnip",
},
meats =>
We will get you there, eventually, ;-)...
Ed Sickafus wrote:
Although you all are trying, I'm still not getting it -- namely, how to use
the hash names in a HoH.
My reference shows the following template for a HoH:
outermost hash
| inner level of h
Although you all are trying, I'm still not getting it -- namely, how to use
the hash names in a HoH.
My reference shows the following template for a HoH:
outermost hash
| inner level of hashes
| | innermost key/value
