-------------------------------------------------------------------------------------------------<br>Codigo:<br><br><br>my %table = (<br>&nbsp;&nbsp;&nbsp; "Variavel 1" =&gt; "T1r",<br>&nbsp;&nbsp;&nbsp; "Variavel 2"&nbsp;&nbsp; =&gt; "T2r",<br>&nbsp;&nbsp;&nbsp; "Variavel 3" =&gt; "T3r",<br>);<br><br><br>$dbh = DBI-&gt;connect("DBI:mysql:$DBName",$UserName, $password) || die("Erro de Conexao:$DBI:errstr") ;<br><br>chdir ($caminho) || die "\n *** Erro no diretorio $caminho ***";<br><br>for(parse_dir(`ls -ltr`)) <br>{<br>($arquivo) = @$_;<br><br>open(FH, "&lt;$arquivo") or die("Arquivo nao encontrado");<br>@table = &lt;FH&gt;;<br>shift @table; # descarta primeira linha<br>close(FH);<br><br>foreach(@table) <br>{<br><br>if ($_ =~ /^\s*VARIAVEL/) <br>{<br>&nbsp; <br>&nbsp;&nbsp;&nbsp; if( (s#^\s*VARIAVEL-S##) or (s#^\s*VARIAVEL-B##) ) <br>&nbsp;&nbsp;&nbsp; {<br>&nbsp;&nbsp;&nbsp; <br>&nbsp;&nbsp;&nbsp; <br>&nbsp;&nbsp;&nbsp; <br>&nbsp;&nbsp;&nbsp; &nbsp;}<br>&nbsp;&nbsp;&nbsp;
 &nbsp;else<br>&nbsp;&nbsp;&nbsp; &nbsp;{<br>&nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp; (undef,$variavel,$nome,undef,undef,undef,undef,undef,$data_arquivo,undef,$valor,$var) = split /\s+/, $_;<br><br>&nbsp;&nbsp;&nbsp;&nbsp; $data_arquivo =~ s/(\d\d\d\d)(\d\d)(\d\d)_(\d\d)(\d\d)/$1-$2-$3 $4:00/;<br><br>&nbsp; &nbsp;&nbsp; if (defined $table{$variavel}) <br>&nbsp;&nbsp;&nbsp; &nbsp;{<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; <br>&nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp; $variavel = $table{$variavel};<br>&nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; <br>&nbsp;&nbsp;&nbsp; &nbsp;}<br><br>&nbsp;&nbsp;&nbsp;&nbsp; $update = "$variavel=$valor";<br>&nbsp;&nbsp;&nbsp; &nbsp;<br>&nbsp;&nbsp;&nbsp; &nbsp;$sql="Insert into tabela1(Nome,DataHora) values($nome,$data) on duplicate key update $update";<br>&nbsp;&nbsp;&nbsp;&nbsp; <br>&nbsp;&nbsp;&nbsp; <br>&nbsp;&nbsp;&nbsp; # $sth =
 $dbh-&gt;prepare($SQL);<br>&nbsp;&nbsp;&nbsp; # $sth-&gt;execute();<br>&nbsp;&nbsp;&nbsp;&nbsp; # $sth-&gt;finish();<br><br>&nbsp;&nbsp;&nbsp; }<br>&nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp; &nbsp;<br>&nbsp; }<br>&nbsp;&nbsp;&nbsp; <br><span style="color: rgb(192, 0, 0);">Entao pessoal esta ai!! :) desculpe se anteriormente nao postava o codigo.. daqui pra frente comecarei a postar!! :P<br>Ajuda os companheiros tb!!<br><br>:***<br></span><br><br><br><br><br><br><b><i></i></b><blockquote class="replbq" style="border-left: 2px solid rgb(16, 16, 255); margin-left: 5px; padding-left: 5px;"><blockquote class="replbq" style="border-left: 2px solid rgb(16, 16, 255); margin-left: 5px; padding-left: 5px;"><div><blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;"><div><br>Ola Pessoal :)<br>Eu again solicitando ajuda.. <br><br>Bom.. gostaria de uma sugestao de vcs, no caso eu leio linha por linha de um arquivo ,
 armazeno a variavel e seu respectivo valor e faco essa instrucao SQL para cada linha: <br>"Insert into  $tipo(Nome,DataHora) values($nomen,$data) on duplicate key update $update";<br>sendo o update = &nbsp;&nbsp;&nbsp; $update = "$variavel=$valor";<br><br>So que.. para cada linha eu teria uma execucao no Banco, que eu acho que nao eh favoravel... <br>Como eu poderia fazer isso? poderia identificar para todas linhas com nome=x armazenar as variaveis e inserir.. mas por outro lado.. teria que verificar o campo data tb!! :)<br><br>Nao sei se fui clara!!<br><br>Mas quem puder me dar um help <br><br><br>Obrigada<br></div><div><span class="ad"><br><br>&nbsp;&nbsp;&nbsp;&nbsp; <br><div>   </div><hr size="1">  <a href="http://us.rd.yahoo.com/mail/br/tagline/mail/*http://br.info.mail.yahoo.com/" target="_blank" onclick="return top.js.OpenExtLink(window,event,this)">Abra sua conta no Yahoo! Mail</a> - 1GB de espaço, alertas de e-mail no celular e anti-spam realmente eficaz. 
 <div></div></span></div><br>_______________________________________________<br>Cascavel-pm mailing list<br><a onclick="return top.js.OpenExtLink(window,event,this)" href="mailto:Cascavel-pm@pm.org">Cascavel-pm@pm.org</a><br> <a onclick="return top.js.OpenExtLink(window,event,this)" href="http://mail.pm.org/mailman/listinfo/cascavel-pm" target="_blank">http://mail.pm.org/mailman/listinfo/cascavel-pm</a><br><br></blockquote></div><br><br clear="all"> <br>-- <br>Igor Sutton Lopes<br><a href="http://www.izut.com/">http://www.izut.com/</a> _______________________________________________<br>Cascavel-pm mailing list<br>Cascavel-pm@pm.org<br>http://mail.pm.org/mailman/listinfo/cascavel-pm</blockquote><br><div>   </div><hr size="1"> Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu celular. <a href="http://us.rd.yahoo.com/mail/br/tagline/mobile_alerts/*http://br.mobile.yahoo.com/mailalertas/">Registre seu aparelho
 agora!</a>_______________________________________________<br>Cascavel-pm mailing list<br>Cascavel-pm@pm.org<br>http://mail.pm.org/mailman/listinfo/cascavel-pm</blockquote><br><p>
                <hr size=1> 
<a href="http://us.rd.yahoo.com/mail/br/tagline/mail/*http://br.info.mail.yahoo.com/">Abra sua conta no Yahoo! Mail</a> - 1GB de espaço, alertas de e-mail no celular e anti-spam realmente eficaz.