Tradutor Google
Publicado por Fábio Berbert de Paula 11/12/2002
[ Hits: 25.288 ]
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);
}
?>
PortScan em PHP com post usando fsockopen
PHP Script para testar ping de varios enderecoes em arquivo TXT
Cirurgia para acelerar o openSUSE em HD externo via USB
Void Server como Domain Control
Modo Simples de Baixar e Usar o bash-completion
Monitorando o Preço do Bitcoin ou sua Cripto Favorita em Tempo Real com um Widget Flutuante
[Resolvido] VirtualBox can't enable the AMD-V extension
Como verificar a saúde dos discos no Linux
Como instalar , particionar, formatar e montar um HD adicional no Linux?
Como automatizar sua instalação do Ubuntu para desenvolvimento de software.
Não consigo instalar distro antiga no virtualbox nem direto no hd (14)
Quais os códigos mais dificeis que vcs sabem fazer? (12)
systemd-resol... precisa ser reiniciado periodicamente [RESOLVIDO] (7)









