$VAR1 = {
'1' => {
'1' => {
'EMail' => 'norbert@thnwb.com',
'Name' => 'Norbert Bodkin'
},
'5' => {
'EMail' => 'sue@thnwb.com',
'Name' => 'Sue Soup'
}
},
'2' => {
'3' => {
'EMail' => 'max@thnwb.com',
'Name' => 'Max Grappler'
}
}
};
####
106 my $status;
107 for $status (keys %Status) {
108 for (keys %{ $Status{$status} }) {
109 print $Status{$status}{$_}{'Name'}, br;
110 }
111 }
####
Can't use string ("1") as a HASH ref while "strict refs" in use at /home/htdocs/hosted/thinweb/lib/devbox.pm line 108.
####
105 my $status;
106 my $id;
107 for $status (keys %Status) {
108 for $id (keys %{ $Status{$status} }) {
109 print $Status{$status}{$id}{'Name'}, br;
110 }
111 }