Verificación Anti-Spam ? – Hell no !

Revisaba unas páginas locales, mas específicamente una revista y me llamo la atención esta “suerte” de captcha. [ Imagen ]


Vemos que el patrón del captacha no debiera ser muy difícil de sortear con un poco de captcha recognition o OpenCV pero veamos el source:

UPS!:


El Captcha esta en texto plano en el source.

Entonces podemos automatizar y SPAMEAR al objetivo sin problema no?

Para obtener el captcha:[ Perl ]




#!/usr/bin/perl

#blog.xshinee.cl
#@shinee_

use LWP::UserAgent;
use strict;


print "## Explointing...\n";
my $baseUrl="http://URLDESTINO";

my $dato = &httpGet($baseUrl);
while ( $dato =~ m!(.*?)!ig){
my $rg = $1;
my @data = split(/\+/, $rg);

my $FinalCaptcha = @data[1]+@data[2]+@data[3] ;
print " Este es el captcha $FinalCaptcha\n" ;

};



sub httpGet{
my $url = shift;
my $navegador = new LWP::UserAgent;
$navegador -> agent ("Internet of Things? - Labs");
my $req = HTTP::Request -> new (GET => $url);
my $respuesta = $navegador -> request ($req);
my $contenido = $respuesta ->as_string;
return $contenido;
}

___

Solo queda agregar un par de lineas en el código para que haga el la petición POST y mande el comentario cada cierto tiempo que queramos.



🙂

Leer artículo original: Verificación Anti-Spam ? – Hell no !

Leave a Reply

Your email address will not be published. Required fields are marked *

This site uses Akismet to reduce spam. Learn how your comment data is processed.