API do Bing para traduzir textos
Publicado por Perfil removido (última atualização em 08/10/2013)
[ Hits: 3.989 ]
A partir dessa API podemos traduzir textos em diferentes linguagens para o português.
#!/usr/bin/perl -w
# By MMxM
# http://goo.gl/YznD0X | http://goo.gl/IV8KUd
use strict;
use WWW::Mechanize;
our $RTTAppID;
print "[+] Aguarde ...\n";
my $mech = WWW::Mechanize->new();
$mech->get( 'http://www.bing.com/translator/' );
if($mech->content() =~ /Default.Constants.RTTAppID = '(.*)'/){
$RTTAppID = $1;
} else {
print "[-] Erro\n";
exit(1);
}
while(1){
print "\$ ";
my $texto = <>;
$texto =~ s/ /+/gi;
chomp($texto);
my $url = ( "http://api.microsofttranslator.com/v2/ajax.svc/TranslateArray2?appId=\"$RTTAppID\"&texts=[\"".$texto."\"]&from=\"\"&to=\"pt\"&oncomplete=_mstc1&onerror=_mste1" );
$mech->get( $url );
if($mech->content =~ /"TranslatedText":"(.*?)"/) { print "$1\n"; }
}
SMTP Mass Mail - Enviando e-mails em massa para vários endereços a partir de um servidor SMTP
IPloc - Informações e localização de um determinado endereço IP
PDF completo com todas as páginas do Diário Oficial do Estado de Goiás
Automatizando o envio de arquivo p/ o FTP !
Nenhum comentário foi encontrado.
Berry Bank: Criando um Banco Digital Gamificado para seus Filhos com Gentoo, Flask e Tailscale
Papagaiando o XFCE com temas e recursos
Instale o DOOM Retro no Gentoo facilmente via Overlay
Steam (Flatpak) rodando jogos em partição NTFS
O dock Plank + U-Launcher deixam qualquer desktop mais produtivo
Instalar Linux em notebook Sony Vaio VPCEG13EB (17)
Alguém tem que acabar com ANATEL!!! (10)
O que você está ouvindo agora? [2] (229)









