Pesquisa Preços pela Internet
Publicado por Lame Duck 25/04/2008
[ Hits: 8.737 ]
Homepage: www.patinho.net
Script que lê uma lista de produtos e mostra os menores preços encontrados.
Para mais informações acesse: http://www.patinho.net/verscript.php?id=2
# Script pra PãoDuros Assumidos # Criado por LameDuck # Pra buscar e comprar coisas que estão em promoção mesmo :D # Versão: Só amanhã 0.06 em 10X no carnê :D # Script Sob GPL2 # Mudanças da Versão: Promoção de Hoje só 0.02 :D # Retirado BUG de falta de pasta # Agora Gera 3 Listas. Com preço desejado, preço médio, e preço entre desejado e médio # Só pergunta se quer ver as super promoções. # Mudanças da Versão: Promoção de Hoje só 0.03 :D # Agora lê duas listas de compras diferentes. # Mudanças da Versão: Hoje tá caro, tem 0.04 de juros :D # Verifica menor preço em dois sites diferentes de busca # Mudanças da Versão: Só amanhã 0.05 em 10X no carnê :D # Resolvido BUG para caso não exista o arquivo Lista2 # Agora não tem mais janelinha enchendo o saco avisando de promoção \o/ # Mudanças da Versão: 0.06 ;D # Agora faz apenas 2 tentativas de consulta de cada produto e aguarda 3 segundos antes de tentar pela segunda vez mkdir -p temp BuscarNoSite(){ wget --timeout=15 --output-document=temp/procura.htm --output-file=temp/logwget "$site" cat temp/procura.htm | sed s/'<'/\\n/g > temp/saida maisbarato=`cat temp/saida | grep 'R\$ ' | sed s/.*"blank>"// | sed '1q;d'` maisbarato=`echo $maisbarato | sed s/","/"."/ | sed s/'R\$ '//` maisbarato=`echo "$maisbarato / 1" | bc` entre=`echo "($medio - $desejado) / 2 + $desejado" | bc` echo -e "$descricao \n Valor Mais Barato: $maisbarato \n Valor Médio: $medio" if [ "$maisbarato" -le "$desejado" ] then #Xdialog --yesno "SUPER PROMOÇÃO! \n $descricao \n Valor Mais Barato: $maisbarato \n Valor Desejado: $desejado \n Valor Médio: $medio \n Deseja Ver o Produto?" 0 0 #if [ $? == "0" ] #then #firefox "$site" #fi echo "<br><a href=\"$site\">$descricao - R$ $maisbarato</a>" >> temp/${endereco_lista}Barata.htm elif [ "$maisbarato" -le "$entre" ] then echo "<br><a href=\"$site\">$descricao - R$ $maisbarato</a>" >> temp/${endereco_lista}Barata2.htm elif [ "$maisbarato" -le "$medio" ] then echo "<br><a href=\"$site\">$descricao - R$ $maisbarato</a>" >> temp/${endereco_lista}Barata3.htm fi } BuscarNoSite2(){ wget --timeout=15 --output-document=temp/procura.htm --output-file=temp/logwget "$site" mv temp/procura.htm temp/saida maisbarato=`cat temp/saida | grep 'preco_texto_destaque' | sed s/.*"R\$ "// | sed '1q;d'` maisbarato=`echo $maisbarato | sed s/","/"."/ | sed s/'<\/'.*//` maisbarato=`echo "$maisbarato / 1" | bc` entre=`echo "($medio - $desejado) / 2 + $desejado" | bc` echo -e "$descricao \n Valor Mais Barato: $maisbarato \n Valor Médio: $medio" if [ "$maisbarato" -le "$desejado" ] then #Xdialog --yesno "SUPER PROMOÇÃO! \n $descricao \n Valor Mais Barato: $maisbarato \n Valor Desejado: $desejado \n Valor Médio: $medio \n Deseja Ver o Produto?" 0 0 #if [ $? == "0" ] #then #firefox "$site" #fi echo "<br><a href=\"$site\">$descricao - R$ $maisbarato</a>" >> temp/${endereco_lista}Barata.htm elif [ "$maisbarato" -le "$entre" ] then echo "<br><a href=\"$site\">$descricao - R$ $maisbarato</a>" >> temp/${endereco_lista}Barata2.htm elif [ "$maisbarato" -le "$medio" ] then echo "<br><a href=\"$site\">$descricao - R$ $maisbarato</a>" >> temp/${endereco_lista}Barata3.htm fi } buscarlista(){ echo 'Preço Menor ou Igual ao "Desejado"<br>' > temp/${endereco_lista}Barata.htm echo 'Preço entre a primeira metade da distância do "Desejado" e "Valor Médio" ( deu pra entender? )<br>' > temp/${endereco_lista}Barata2.htm echo 'Preço entre a segunda metade da distância entre o "Desejado" e "Valor Médio" ( deu pra entender? )<br>' > temp/${endereco_lista}Barata3.htm cat $endereco_lista | while read tag medio desejado descricao; do if [ $tag == "##" ] then id="$medio" id2="$desejado" elif [ $tag != "#" ] then site="http://compare.buscape.com.br/procura?$id&kw=$descricao&ordem=prec&pagina=1" echo $site BuscarNoSite site="http://www.jacotei.com.br/mod.php?module=jacotei.pesquisa&texto=$descricao&$id2&precomin=&precomax=&lang=pt-br&ordem=3" echo $site BuscarNoSite2 fi done } endereco_lista="Lista1" buscarlista if [ -f "Lista2" ]; then endereco_lista="Lista2" buscarlista fi
PC Report - Coleta lista de dispositivos instalados e logs
Instalar AWX (container) em CentOS 7
Desktop Linux ganha fôlego enquanto distros refinam experiência e segurança
Wayland em alta, IA em debate e novos ventos para distros e devices
Qt 6.10 e Python 3.14 puxam o ritmo do software livre nesta quarta
Atualizações de Apps, Desktop e Kernel agitam o ecossistema Linux nesta terça-feira
Como mudar o nome de dispositivos Bluetooth via linha de comando
Adicionando o repositório backports no Debian 13 Trixie
Não tenho som no meu Kali linux (0)
Erro ao fazer remaster usando Penguin eggs (2)
Primeiras impressões do Debian 13 (25)
Meu Amigo não consegue entrar em meu mundo, via tailscale, hamachi e z... (1)