- or download this
$VAR1 = {
'1' => {
'1' => {
...
}
}
};
- or download this
106 my $status;
107 for $status (keys %Status) {
108 for (keys %{ $Status{$status} }) {
109 print $Status{$status}{$_}{'Name'}, br;
110 }
111 }
- or download this
Can't use string ("1") as a HASH ref while "strict refs" in use at /home/htdocs/hosted/thinweb/lib/devbox.pm line 108. - or download this
105 my $status;
106 my $id;
107 for $status (keys %Status) {
...
109 print $Status{$status}{$id}{'Name'}, br;
110 }
111 }