sQuo Posted March 28, 2014 Share Posted March 28, 2014 Dev by CrashBandicot [LENGUAJE=perl] use HTTP::Request; use LWP::UserAgent; use LWP::Simple; #Dev by CrashBandicot #G33tz To COupDeGrace , ma3str0-Dz , Mouadh Kalashnikov , Boualem , xMjhad and all member of madleets system('cls'); system('title PhpMyadminFInder by CrashBandicot'); @pathh=('/phpMyAdmin/', '/phpmyadmin/', '/PMA/', '/pma/', '/admin/', '/dbadmin/', '/mysql/', '/myadmin/', '/phpmyadmin2/', '/phpMyAdmin2/', '/phpMyAdmin-2/', '/php-my-admin/', '/phpMyAdmin-2.2.3/', '/phpMyAdmin-2.2.6/', '/phpMyAdmin-2.5.1/', '/phpMyAdmin-2.5.4/', '/phpMyAdmin-2.5.5-rc1/', '/phpMyAdmin-2.5.5-rc2/', '/phpMyAdmin-2.5.5/', '/phpMyAdmin-2.5.5-pl1/', '/phpMyAdmin-2.5.6-rc1/', '/phpMyAdmin-2.5.6-rc2/', '/phpMyAdmin-2.5.6/', '/phpMyAdmin-2.5.7/', '/phpMyAdmin-2.5.7-pl1/', '/phpMyAdmin-2.6.0-alpha/', '/phpMyAdmin-2.6.0-alpha2/', '/phpMyAdmin-2.6.0-beta1/', '/phpMyAdmin-2.6.0-beta2/', '/phpMyAdmin-2.6.0-rc1/', '/phpMyAdmin-2.6.0-rc2/', '/phpMyAdmin-2.6.0-rc3/', '/phpMyAdmin-2.6.0/', '/phpMyAdmin-2.6.0-pl1/', '/phpMyAdmin-2.6.0-pl2/', '/phpMyAdmin-2.6.0-pl3/', '/phpMyAdmin-2.6.1-rc1/', '/phpMyAdmin-2.6.1-rc2/', '/phpMyAdmin-2.6.1/', '/phpMyAdmin-2.6.1-pl1/', '/phpMyAdmin-2.6.1-pl2/', '/phpMyAdmin-2.6.1-pl3/', '/phpMyAdmin-2.6.2-rc1/', '/phpMyAdmin-2.6.2-beta1/', '/phpMyAdmin-2.6.2-rc1/', '/phpMyAdmin-2.6.2/', '/phpMyAdmin-2.6.2-pl1/', '/phpMyAdmin-2.6.3/', '/phpMyAdmin-2.6.3-rc1/', '/phpMyAdmin-2.6.3/', '/phpMyAdmin-2.6.3-pl1/', '/phpMyAdmin-2.6.4-rc1/', '/phpMyAdmin-2.6.4-pl1/', '/phpMyAdmin-2.6.4-pl2/', '/phpMyAdmin-2.6.4-pl3/', '/phpMyAdmin-2.6.4-pl4/', '/phpMyAdmin-2.6.4/', '/phpMyAdmin-2.7.0-beta1/', '/phpMyAdmin-2.7.0-rc1/', '/phpMyAdmin-2.7.0-pl1/', '/phpMyAdmin-2.7.0-pl2/', '/phpMyAdmin-2.7.0/', '/phpMyAdmin-2.8.0-beta1/', '/phpMyAdmin-2.8.0-rc1/', '/phpMyAdmin-2.8.0-rc2/', '/phpMyAdmin-2.8.0/', '/phpMyAdmin-2.8.0.1/', '/phpMyAdmin-2.8.0.2/', '/phpMyAdmin-2.8.0.3/', '/phpMyAdmin-2.8.0.4/', '/phpMyAdmin-2.8.1-rc1/', '/phpMyAdmin-2.8.1/', '/phpMyAdmin-2.8.2/', '/sqlmanager/', '/mysqlmanager/', '/p/m/a/', '/PMA2005/', '/pma2005/', '/phpmanager/', '/php-myadmin/', '/phpmy-admin/', '/webadmin/', '/sqlweb/', '/websql/', '/webdb/', '/mysqladmin/', '/mysql-admin/', '/mya/', ); print " \t \t :::==== :::===== :::==== :::======= \t :::==== ::: ::: === ::: === === \t === ====== ======== === === === \t === === === === === === \t === ======== === === === === \t:::======= :::==== :::=== :::==== :::==== \t::: === === ::: === ::: :::==== ::: === \t=== === === === === ===== === ======== \t=== === === === === === === === \t=== === ====== ====== === === === \n"; print "\t PhpMy4dmin F1nder Coded by CrashBandicot FRom TeaM MosTa "; print "\n \t Result in PhpMyadmin.txt"; print " \n\n Enter the Target eg:http://www.target.com/:"; my $trget = ; chomp $trget; foreach $pathh(@pathh){ my $URLll = $trget.$pathh; my $Source = get $URLll; die "Can not get $URLll" unless defined $URLll; if ($Source =~ /phpMyAdmin/ || /Welcome to phpMyAdmin/ || /Username/ || /Password/) { $Messageee ="PhpMyAdmin P4n3l F!nded";} else { $Messageee = "P4n3l Not F0und ";} print "$URLll => $Messageee\n"; print "\n \n \n \n \t \t \t \t FINISH "; open (TEXT, '>>PhpMyadmin.txt'); print TEXT "\n$URLll => $Messageee \n\n"; close (TEXT); } [/LENGUAJE] Link to comment Share on other sites More sharing options...
Recommended Posts