How can I do this correctly?

foreach my $col (@columns) {
              my %{$col} = (
                        string => "$col",
                        number => [EMAIL PROTECTED]
                        );
              push (@graph, \%{$col});
}

--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>


Reply via email to