Hello Dave,
here's your bug:
> while (($game_id, @teams) = each %fixture) {
> print "Game=$game_id Home=$teams[0]\n";
> }
I guess you thought that @teams would get an arry of
values. Instead, the array is assigned one array reference.
To access the array elements from a reference, use the
-> operator:
while ( my($game_id, $team_ref) = each %fixture) {
print "Game=$game_id Home=$team_ref->[0]\n";
}
HTH,
Thomas
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
