[Perl] Project ParanoicScan 1.7

[Doddy]

As the first program of 2014 I bring you the new version of my ParanoicScan in its version 1.7, while some people stole the source code of the previous version of this program code, the issue is that not bother me that you used the code but only changed him the program name and the name of the author did not bother to change the names of the variables only changed the name of the author, for a moment hesitate to continue to share the code of this 2-year project working but despite that I continue to share the code of this program, besides explorer (of perlenespanol) recommended me to do another version of this program was to demonstrate that the real author so that the program has the dual function and arrange countless bugs that were in all the code.

[++] Old Options

Google & Bing Scanner that also scan :

 * XSS
 * SQL GET / POST
 * SQL GET
 * SQL GET + Admin
 * Directory listing
 * MSSQL
 * Jet Database
 * Oracle
 * LFI
 * RFI
 * Full Source Discloure
 * HTTP Information
 * SQLi Scanner
 * Bypass Admin
 * Exploit FSD Manager
 * Paths Finder
 * IP Locate
 * Crack MD5
 * Panel Finder
 * Console

[++] Fixes

• Refresh of existing pages to crack md5
• Error scanner fsd
• Http error scanner scan
• Spaces between text too annoying
• Added array to bypass
• Failed to read from file

[++] New options

• Generate all logs in a html file
• Incorporates random and new useragent
• Multi encoder / decoder :

* Ascii
 * Hex
 * Url
 * Bin To Text & Text To Bin

• PortScanner
• HTTP FingerPrinting
• CSRF Tool
• Scan XSS
• Generator for XSS Bypass
• Generator links to tiny url
• Finder and downloader exploits on Exploit-DB
• Mysql Manager
• Tools LFI

A video with examples of usage

- ParanoicScan 1.7 - Examples of use -

Available for download here :

Github
GoogleCode
SourceForge
PasteBin

Good Bye

[d4rkcat]

Holy heck!

This is the biggest script i've ever seen! 5326 Lines!!!!

You could definitely learn perl with just this script, many thanks

[lucid]

Holy heck!

This is the biggest script i've ever seen! 5326 Lines!!!!

You could definitely learn perl with just this script, many thanks

The PHP cyber shell is close to 9000 lines.

[Kulverstukas]

The PHP cyber shell is close to 9000 lines.

But it's not over nine thousand!

[lucid]

But it's not over nine thousand!

Indeed

[youpi]

Didn't try it out as it seems to need some additional perl libraries on MAC but I'll make sure to try it anytime soon.


If it does what it says, awesome tool I must say.

[humko]

Awsome stuff, i made few modification, i will send them only to author, sorry i'm in not so kind like him =) for public here add new search engine(it's without limit)

Code: [Select]

    sub teoma {
        my ( $a, $b ) = @_;
        for ( $pages = 10 ; $pages <= $b ; $pages = $pages + 10 ) {
            my $code =
              toma( "http://www.teoma.com/web?q=" . $a . "&page=" . $pages );
            while ( $code =~ /(?<=href=")(.*?)"/mig ) {
                push( @founds, $1 );
            }
        }