XPF encuentra paneles de administracion

Buscando por la red encontré un blog en el cual habia una herramienta para encontrar paneles de administracion de una pagina web cualquiera, me parecio interesante ya que la probe con una pagina web que tenia hace meses y el programa me encontro un panel de administracion por el cual tuve acceso a la web

el programa esta echo en perl, por lo que me llamo mas la atencion ya que se puede usar en linux,

aqui les dejo el code:

-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------

#!/usr/bin/perl

use LWP::UserAgent;

if (!$ARGV[0]) {

print q (

xassiz PathFinder

db    db d8888b. d88888b
`8b  d8' 88  `8D 88'
`8bd8'  88oodD' 88ooo      Modificado Por F1D3N715 >> Añadido mas paneles de administracion
.dPYb.  88~~~   88~~~
.8P  Y8. 88      88
YP    YP 88      YP

[+] Modo de uso:

perl XPF.pl http://www.target.com

-------------------------------

Coded by xassiz

);

exit 1;

}

print q (

db    db d8888b. d88888b
`8b  d8' 88  `8D 88'
`8bd8'  88oodD' 88ooo
.dPYb.  88~~~   88~~~      Modificado Por F1D3N715 >> Añadido mas paneles de administracion
.8P  Y8. 88      88
YP    YP 88      YP

);

$target = $ARGV[0];

print("n [?] Analizando: $target n");

@paneles=('admin/','ADMIN/','paneldecontrol/','login/','adm/','cms/',
'admon/','ADMON/','administrador/','administrator/','admin/login.php',
'ADMIN/login.php','admin/home.php','admin/controlpanel.html','admin/controlpanel.php','admin.php',
'admin.html','admin/cp.php','admin/cp.html','cp.php','cp.html','controlpanel/','panelc/',
'administrator/index.php','administrator/login.html','administrator/login.php','administrator/account.html',
'administrator/account.php','administrator.php','administrator.html','login.php','login.html',
'modelsearch/login.php','moderator.php','moderator.html','moderator/login.php','moderator/login.html',
'moderator/admin.php','moderator/admin.html','moderator/','account.php','account.html','controlpanel/',
'admin/index.asp','admin/login.asp','admin/home.asp','admin/controlpanel.asp','admin.asp','admin/cp.asp',
'cp.asp','administrator/index.asp','administrator/login.asp','administrator/account.asp','administrator.asp',
'login.asp','modelsearch/login.asp','moderator.asp','moderator/login.asp','moderator/admin.asp','account.asp',
'controlpanel.asp','admincontrol.asp','adminpanel.asp','fileadmin/','fileadmin.php','fileadmin.asp',
'fileadmin.html','administration/','administration.php','administration.html','sysadmin.php','sysadmin.html',
'phpmyadmin/','myadmin/','sysadmin.asp','sysadmin/','ur-admin.asp','ur-admin.php','ur-admin.html','ur-admin/',
'Server.php','Server.html','Server.asp','Server/','wp-admin/','administr8.php','administr8.html',
'administr8/','administr8.asp','webadmin/','webadmin.php','webadmin.asp','webadmin.html','administratie/',
'admins/','admins.php','admins.asp','admins.html','administrivia/','Database_Administration/','WebAdmin/',
'sysadmins/','admin1/','system-administration/','administrators/','pgadmin/','directadmin/',
'staradmin/','ServerAdministrator/','SysAdmin/','administer/','sys-admin/','typo3/',
'panel/','cpanel/','cPanel/','cpanel_file/','platz_login/','rcLogin/','blogindex/',
'formslogin/','autologin/','support_login/','meta_login/','manuallogin/','simpleLogin/',
'loginflat/','utility_login/','showlogin/','memlogin/','members/','login-redirect/','sub-login/',
'wp-login/','login1/','dir-login/','login_db/','xlogin/','smblogin/','customer_login/',
'login-us/','acct_login/','admin_area/','bigadmin/','project-admins/','phppgadmin/','pureadmin/',
'sql-admin/','radmind/','openvpnadmin/','wizmysqladmin/','vadmind/','ezsqliteadmin/',
'hpwebjetadmin/','newsadmin/','adminpro/','Lotus_Domino_Admin/','bbadmin/','vmailadmin/',
'Indy_admin/','ccp14admin/','irc-macadmin/','banneradmin/','sshadmin/','phpldapadmin/','macadmin/',
'administratoraccounts/','admin4_account/','admin4_colon/','radmind-1/','Super-Admin/','AdminTools/',
'cmsadmin/','SysAdmin2/','globes_admin/','cadmins/','phpSQLiteAdmin/','navSiteAdmin/','server_admin_small/',
'logo_sysadmin/','server/','database_administration/','ADMIN/login.html','system_administration/','ss_vms_admin_sm/');

foreach $finder( @paneles) {
$buscador = LWP::UserAgent->new() or die;
$busqueda = $buscador->get($target."/".$finder);

if ($busqueda->content =~ /username/ || $busqueda->content =~ /Username/ || $busqueda->content =~ /UserName/ ||
$busqueda->content =~ /usuario/ || $busqueda->content =~ /Usuario/ ||
$busqueda->content =~ /user/ || $busqueda->content =~ /User/ ||
$busqueda->content =~ /password/ || $busqueda->content =~ /Password/ ||
$busqueda->content =~ /contraseña/ || $busqueda->content =~ /Contraseña/ ||
$busqueda->content =~ /senha/ || $busqueda->content =~ /Senha/ ||
$busqueda->content =~ /pass/ || $busqueda->content =~ /Pass/ ||
$busqueda->content =~ /pwd/ || $busqueda->content =~ /Pwd/
) {
print("n [+] Encontrado: $target/$finder na");
}
}

exit 1;

-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------

Como usar en linux

crean un documento vacio y copian el code al documento y le ponen de nombre finder.pl o cualquier nombre.pl y guardan todo y lo cierran, despues abren la shell y ubican el archivo, yo lo guarde en el escritorio para acceder mas facil a el, en mi caso, escribo: cd Escritorio

cuando lo ubiquen ejecutan el comando: perl finder.pl y sigan las instrucciones que les muestre en pantalla

-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------

En windows,

hacen lo mismo que en linux pero deben tener instalado activeperl