[Cascavel-pm] Sugestao - Insercao no Banco

[Nelson Ferraz]

Uma vez que você tenha definido a tabela de conversão...

> my %table = (
>     "Variavel 1" => "T1r",
>     "Variavel 2"   => "T2r",
>     "Variavel 3" => "T3r",
> );

Se as variáveis sempre aparecem como "Variavel 1", "Variavel 2" e 
"Variavel 3", você pode apagar o seguinte trecho:

>      if (defined $table{$variavel})
>      {
>         
>         $variavel = $table{$variavel};
>              
>      }
> 
>      $update = "$variavel=$valor";

E usar o hash diretamente:

       $update = "$table{$variavel} = $valor";

OBS - seria bom escolher um nome melhor para a variável "%table".

[]s

Nelson