I'm trying to find out how to either make or find an automated program that I could use to skew a poll.
It would have to be able to enter registration information in specific fields before voting, including an email address. None of the information is verified though, so it would be as simple as using all the same info except for the email. The email address could be randomized or just have a number in it that goes up in incrementally. After that, I would just need it to vote for me.
Any ideas? I'm stumped.
Comments
:
: It would have to be able to enter registration information in specific fields before voting, including an email address. None of the information is verified though, so it would be as simple as using all the same info except for the email. The email address could be randomized or just have a number in it that goes up in incrementally. After that, I would just need it to vote for me.
:
: Any ideas? I'm stumped.
:
Since this needs to use some kind of server script or something similar, then learn PHP or something, or atleast the thinking.
Then it's just to make a program that sends posts or gets to the server.
You should maybe use sockets for this...
[link=http://www.activestate.com/Products/activeperl/]ActiveState Perl[/link]
The loop... in case is GET...
[code]
for ($i=0; $i <= 1000; $i++) {
#$r = HTTP::Request->new( $method, $uri, $header, $content )
$r = HTTP::Request->new( "GET", "http://www.domain.com/surv.cgi?id=$i" )
}
[/code]
The post .. in case is POST...
[code]
An example from ActiveState
HTTP::Request::Common - Construct common HTTP::Request objects
Sending my ~/.profile to the survey can be achieved by this:
POST 'http://www.perl.org/survey.cgi',
Content_Type => 'form-data',
Content => [ name => 'Gisle Aas',
email => 'gisle@aas.no',
gender => 'M',
born => '1964',
init => ["$ENV{HOME}/.profile"],
]
This will create a HTTP::Request object that almost looks this (the
boundary and the content of your ~/.profile is likely to be different):
POST http://www.perl.org/survey.cgi
Content-Length: 388
Content-Type: multipart/form-data; boundary="6G+f"
--6G+f
Content-Disposition: form-data; name="name"
Gisle Aas
--6G+f
Content-Disposition: form-data; name="email"
gisle@aas.no
--6G+f
Content-Disposition: form-data; name="gender"
M
--6G+f
Content-Disposition: form-data; name="born"
1964
--6G+f
Content-Disposition: form-data; name="init"; filename=".profile"
Content-Type: text/plain
PATH=/local/perl/bin:$PATH
export PATH
--6G+f--
[/code]
If you dont know programming, then wtf ?
If you dont know perl, just read the part about HTTP::Request::Common
I should know the details to write an complete example script.
You got an start...
[red]Good luck![/red]
[blue]Hackman[/blue]