Tradutor Google
Publicado por Fábio Berbert de Paula 11/12/2002
[ Hits: 25.050 ]
Homepage: https://fabio.automatizando.dev
Script usado para traduzir texto em diversos idiomas usando a engine do translate.google.com como fonte de pesquisa.
<!-- tr.google.php --> <? /* ------------------------------------------------------------------- Programado por Fábio Berbert de Paula <fabio@vivaolinux.com.br> http://www.vivaolinux.com.br Script usado para traduzir texto em diversos idiomas usando a engine do translate.google.com como fonte de pesquisa. Rio de Janeiro, 25/09/2002 ------------------------------------------------------------------- */ $traducao = '-'; // se text está definido, temos texto a traduzir if ($text) { $traducao = traduzir($text,$langpair); } ?> <html> <head> <title>tr.google.php</title> <style> <!-- body {margin-right: 1em; margin-left: 1em;} --> </style> </head> <body bgcolor="#ffffff" text="#000000" link="#0000cc" vlink="551a8b" alink="#ff0000"> <table width="100%" border=0 cellspacing=0 cellpadding=1> <tr bgcolor=#ffffff> <td> <form method=post> <font face="arial,sans-serif" size=-1>Traduzir texto:</font> <br> <textarea name=text rows=5 cols=45 wrap=PHYSICAL><? echo $text; ?></textarea><br> <font face="arial,sans-serif" size=-1>De</font> <select name=langpair> <option value="en|de">Inglês para Alemão</option> <option value="en|es">Inglês para Espanhol</option> <option value="en|fr">Inglês para Francês</option> <option value="en|it">Inglês para Italiano</option> <option value="en|pt" selected>Inglês para Português</option> <option value="de|en">Alemão para Inglês</option> <option value="de|fr">Alemão para Francês</option> <option value="es|en">Espanhol para Inglês</option> <option value="fr|en">Francês para Inglês</option> <option value="fr|de">Francês para Alemão</option> <option value="it|en">Italiano para Inglês</option> <option value="pt|en">Português para Inglês</option> </select> <input type=hidden name=hl value="en"> <input type=hidden name=ie value="Unknown"> <input type=hidden name=oe value="ASCII"> <input type=submit value=" Traduzir "> </form> </td></tr> <tr><td> <br><br> <font face="arial,sans-serif" size=-1> Texto traduzido:<Br> <pre><? echo $traducao; ?></pre> </font> </table> </body> </html> <? function traduzir($text,$langpair) { // definição de variáveis $host = 'translate.google.com'; $vars = "hl=en&ie=Unknown&oe=ASCII&langpair=$langpair&text=" . urlencode($text); $url = "/translate_t?$vars"; // efetuando conexão com o google $fp = fsockopen ($host, 80, $errno, $errstr, 30); if (!$fp) { echo "Ocorreu um erro ao tentar conexão com $host: $errstr ($errno)<br>\n"; exit; } else { $addinfo .= "Accept-Language: en\r\nAccept-Charset: iso-8859-1,*,utf-8\r\n"; fputs ($fp, "GET $url HTTP/1.1\r\nHost: $host\r\n$addinfo\r\n"); while (!feof($fp)) { $html .= fgets ($fp,128); } fclose ($fp); } // removendo quebras de linhas do resultado $html = ereg_replace("\n"," ",$html); // capturando o texto traduzido ereg("name=q rows=[0-9]* cols=[0-9]* wrap=PHYSICAL>(.*)</textarea>",$html,$saida); $traducao = $saida[1]; $traducao = ereg_replace(">.*$","",$traducao); return($traducao); } ?>
Cria gráficos para monitoramento de consumo de CPU e Memória a partir de arquivos [Atualização].
php-scan-rede - scanner de rede simples em PHP
Instalar e Configurar o Slackware Linux em 2025
Como configurar os repositórios do apt no Debian 12 em 2025
Passkeys: A Evolução da Autenticação Digital
Instalação de distro Linux em computadores, netbooks, etc, em rede com o Clonezilla
Configurando o Conky para iniciar corretamente no sistema
3 configurações básicas que podem melhorar muito a sua edição pelo editor nano
Como colorir os logs do terminal com ccze
Instalação Microsoft Edge no Linux Mint 22
Como configurar posicionamento e movimento de janelas no Lubuntu (Openbox) com atalhos de teclado
Ingress NGINX Controller CVSS base score of 9.8 (2)
Impossível corrigir problemas, você manteve (hold) pacotes quebrados. (2)
Linux Mint não conecta Wi-Fi sem fio (18)