Para obter velocidade no acesso � HASH o perl faz a ordena��o quando �
alimentada a vari�vel.
2 op��es:
Mude os c�digos para num�ricos ou crie um array para manter a ordem.
Marcio Conceicao wrote:
> Ola pessoal
>
> Estou com problema no programa abaixo. Eu gostaria
> que o resultado impresso fosse na mesma ordem que est�
> na vari�vel, por�m isso n�o ocorre.
> Qual seria a solu��o?
> Grato.
>
> Marcio Conceicao
> [EMAIL PROTECTED]
> ========================================
> #!/usr/local/bin/perl -w
>
> %escolaridade = (
> "0","Escolha aqui...",
> "pi","Primeiro grau incompleto",
> "pc","Primeiro grau completo",
> "si","Segundo grau incompleto",
> "sc","Segundo grau completo",
> "gi","Gradu��o incompleto",
> "gc","Gradua��o completo",
> "pgi","P�s-gradua��o incompleto",
> "pgc","P�s-gradua��o completo",
> "dc","Doutorado completo",
> "di","Doutorado incompleto",
> );
>
> @formulario = &cria_select('escolaridade');
> print "Content-type: text/html\n\n";
> print @formulario;
>
> sub cria_select {
> my (@results) = "<select name='$_[0]'>";
> foreach $key (keys %escolaridade) {
> push @results, "<option
> value='$key'>$escolaridade{$key}</option>\n";
> }
> push @results, "</select>";
> return @results;
> }
> =========================
> __________________________________________________
> Do You Yahoo!?
> Talk to your friends online with Yahoo! Messenger.
> http://im.yahoo.com
> http://www.mrweb.com.br/perl/
> =======================================
> >>No site da lista, voce tera tudo sobre PERL,
> >>LINUX, PHP, ASP e informacoes, cadastramento
> >>e descadastramento da Lista.
> =======================================
--
FiscoData Legisla��o On Line - Curitiba/PR
Marco A P D'Andrade - [EMAIL PROTECTED]
WebMaster (41) 333-5775
http://www.mrweb.com.br/perl/
=======================================
>>No site da lista, voce tera tudo sobre PERL,
>>LINUX, PHP, ASP e informacoes, cadastramento
>>e descadastramento da Lista.
=======================================
