Best Club Penguin Bots
Hello, you are not logged in. You may log in or register.

Join the forum, it's quick and easy

Best Club Penguin Bots
Hello, you are not logged in. You may log in or register.
Best Club Penguin Bots
Would you like to react to this message? Create an account in a few clicks or log in to continue.
Best Club Penguin Bots

A Place For Club Penguin Bots And Awesome Stuff Like That

Latest topics
» Add me on discord if you want to catch up!
Phish scam logger EmptyTue Feb 05, 2019 5:36 am by Gizmo92883

» Anybody else come to this forum for the memories?
Phish scam logger EmptyTue Jun 12, 2018 12:07 am by Cooldude21

» This forum died
Phish scam logger EmptyThu Mar 30, 2017 11:10 pm by _Skate_

» Introduce yourselves!
Phish scam logger EmptyFri Jan 23, 2015 7:21 pm by Gizmo92883

» Ozzy's Bot Script
Phish scam logger EmptyMon May 13, 2013 8:31 am by Pig

» Goodbye BCPB Forums.
Phish scam logger EmptyTue Sep 18, 2012 6:37 pm by 43nînjâ17

» Follow bot script (100% Credit to Cp-Cheater )
Phish scam logger EmptySun Sep 16, 2012 4:55 pm by Dentonbrooks

» Xat Main Owner Hacker
Phish scam logger EmptyFri Aug 17, 2012 2:32 am by 43nînjâ17

» xat message big
Phish scam logger EmptySat Aug 11, 2012 12:32 am by 43nînjâ17

Navigation
 Portal
 Index
 Memberlist
 Profile
 FAQ
 Search
Club Penguin Events
Advertisement

Phish scam logger

2 posters

Best Club Penguin Bots :: Other Scripts :: Perl Scripts

Go down

Phish scam logger Empty Phish scam logger

Post  Guest Wed Dec 22, 2010 5:20 pm

Here is a phish logger

Code:
#!/usr/bin/perl
#HF Phisher Log Scanner
#Site: HackForums.net
#Respect: All HF Members, Specialy OMNI who DENIED me for UBER!
use Socket;
system('cls');
system('title Phisher Log Scanner  ');
use LWP::UserAgent;
use HTTP::Request;

regex();
header();

#data

print ">URL:\n";
print '>';chomp($link = <STDIN>);

if($link !~ /http:\/\//) { $link = "http://$link"; }

# Scanning dir...

@vuls = ('log.txt',
'Log.txt',
'logs.txt',
'Logs.txt',
'passwords.txt',
'Passwords.txt',
'password.txt',
'Password.txt',
'Login.txt',
'login.txt',
'User.txt',
'user.txt',
'Users.txt',
'users.txt',
'Phished.txt',
'phished.txt',
'Found.txt',
'found.txt',
'Logger.txt',
'logger.txt',
'phisher.txt',
'Phisher.txt',
'pass.txt',
'Pass.txt',
'logovi.txt',
'Logovi.txt',
'logz.txt',
'logZ.txt',
'LogZ.txt',
'Logz.txt',
'File.txt',
'file.txt');

print ">Scanning...\n";

foreach $scan(@vuls){

$url = $link.$scan;
$request = HTTP::Request->new(GET=>$url);
$useragent = LWP::UserAgent->new();

$response = $useragent->request($request);
if ($response->is_success && $response->content =~ /username/) { $msg = "Not Found";}
if ($response->is_success && $response->content =~ /id/) { $msg = "Not Found";}
if ($response->is_success && $response->content =~ /accountid/) { $msg = "Not Found";}
if ($response->is_success && $response->content =~ /login/) { $msg = "Not Found";}
if ($response->is_success && $response->content =~ /password/) { $msg = "Not Found";}
if ($response->is_success && $response->content =~ /pass/) { $msg = "Not Found";}
if ($response->is_success && $response->content =~ /passwd/) { $msg = "Not Found";}
if ($response->is_success && $response->content =~ /a/) { $msg = "Not Found";}
if ($response->is_success && $response->content =~ /b/) { $msg = "Not Found";}
if ($response->is_success && $response->content =~ /c/) { $msg = "Not Found";}
if ($response->is_success && $response->content =~ /d/) { $msg = "Not Found";}
if ($response->is_success && $response->content =~ /e/) { $msg = "Not Found";}
if ($response->is_success && $response->content =~ /f/) { $msg = "Not Found";}
if ($response->is_success && $response->content =~ /g/) { $msg = "Not Found";}
if ($response->is_success && $response->content =~ /h/) { $msg = "Not Found";}
if ($response->is_success && $response->content =~ /i/) { $msg = "Not Found";}
if ($response->is_success && $response->content =~ /j/) { $msg = "Not Found";}
if ($response->is_success && $response->content =~ /k/) { $msg = "Not Found";}
if ($response->is_success && $response->content =~ /l/) { $msg = "Not Found";}
if ($response->is_success && $response->content =~ /m/) { $msg = "Not Found";}
if ($response->is_success && $response->content =~ /n/) { $msg = "Not Found";}
if ($response->is_success && $response->content =~ /o/) { $msg = "Not Found";}
if ($response->is_success && $response->content =~ /p/) { $msg = "Not Found";}
if ($response->is_success && $response->content =~ /q/) { $msg = "Not Found";}
if ($response->is_success && $response->content =~ /r/) { $msg = "Not Found";}
if ($response->is_success && $response->content =~ /s/) { $msg = "Not Found";}
if ($response->is_success && $response->content =~ /t/) { $msg = "Not Found";}
if ($response->is_success && $response->content =~ /u/) { $msg = "Not Found";}
if ($response->is_success && $response->content =~ /v/) { $msg = "Not Found";}
if ($response->is_success && $response->content =~ /w/) { $msg = "Not Found";}
if ($response->is_success && $response->content =~ /x/) { $msg = "Not Found";}
if ($response->is_success && $response->content =~ /y/) { $msg = "Not Found";}
if ($response->is_success && $response->content =~ /z/) { $msg = "Not Found";}
else { $msg = Vulnerable;}

print "$scan..[$msg]\n";
}

sub regex(){
$sis="$^O";if ($sis eq windows){ $cmd="clear";} else { $cmd="cls"; }
system("$cmd");
}

sub header(){
print q{
[+]--[+]
[+]--Phisher Log Scanner--[+]
[+]--Hackforums.net--[+]
[+]--Schizoid--[+]
--
};
}
#Phisher Log Scanner
###
#Schizoid
###

Guest
Guest


Back to top Go down

Phish scam logger Empty What Is This?

Post  Cooldude1234 Wed Dec 22, 2010 5:37 pm

What Is This And What Dose It Do?
Cooldude1234
Cooldude1234

Posts : 14
Reputation : 1
Join date : 2010-09-26

Back to top Go down

Phish scam logger Empty s

Post  Guest Wed Dec 22, 2010 5:50 pm

checks to see if u can phish

Guest
Guest


Back to top Go down

Phish scam logger Empty I Need Help!!!!!!!!

Post  Cooldude1234 Wed Dec 22, 2010 6:11 pm

Whats Phising?
Cooldude1234
Cooldude1234

Posts : 14
Reputation : 1
Join date : 2010-09-26

Back to top Go down

Phish scam logger Empty whats phising

Post  Cooldude1234 Sat Mar 05, 2011 8:56 pm

whats phising?
Cooldude1234
Cooldude1234

Posts : 14
Reputation : 1
Join date : 2010-09-26

Back to top Go down

Phish scam logger Empty Definition of Phishing

Post  eliotsolomon Sat Apr 23, 2011 9:33 am

Phishing is an illegal method of stealing passwords.

eliotsolomon

Posts : 5
Reputation : 0
Join date : 2011-04-22

Back to top Go down

Phish scam logger Empty Re: Phish scam logger

Post  Sponsored content


Sponsored content


Back to top Go down

Back to top

Best Club Penguin Bots :: Other Scripts :: Perl Scripts

 
Permissions in this forum:
You cannot reply to topics in this forum