Hi All,
I am trying to display some data as follows:
City: Chicago
Street: Main
People:
John Doe 1
John Doe 2
J.D 3
City: L.A
Street
and so on...for the other states
my %state;
While ($line = <INPUT>){
...
push @{$state{$city}{$street}{people}}, @line[5..$#line];
}
Now the problem:
foreach $city (keys %state) {
print" City: $city\n";
foreach $i (0 .. $#{$state{$city}{$street}}{
print" Street: $street\n";
foreach $j (0 .. $#{$state{$city}{$street}{people}{
print" $_\n";
}
}
}
This is where I get stuck. I'd appreciate if someone can help.
I.S
__________________________________________________________________
Get your own FREE, personal Netscape Webmail account today at
http://webmail.netscape.com/
