Ur not refering to the hash correctly. And it's foreach not for each.
foreach $key (keys %start) {
print $start{$key};
}
$message->{Start} may be returning a reference to a hash rather than a hash.
In that case:
$start = $message->{Start};
foreach $key (keys %{$start}) {
print ${$start}{$key};
}
At 03:00 PM 9/23/05 -0400, Gallagher Timothy-TIMOTHYG wrote:
>[CODE}
> %start = $message->{Start};
> For each $key(keys, %start) {
> Print "$start[$key] \n";
> }
>[/CODE]
>
>I get nothing in return, I know that something is in there because if I say
>print $message->{Start} -> Date; I get the date or if I print
>$message->{Start} -> Time;
>I get the start time. Can anyone tell me what I am doing wrong, here is the
--
REMEMBER THE WORLD TRADE CENTER ---=< WTC 911 >=--
"...ne cede malis"
00000100
_______________________________________________
Perl-Win32-Users mailing list
[email protected]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
