PDA

Archiv verlassen und diese Seite im Standarddesign anzeigen : [SUCHE] PERL IRC.Bot für 0day-Exploits von Milworm&Co



karamble
09.09.2009, 06:01
Hi,
ich suche ein Script für einen IRC Bot der in einem Channel aktuelle Exploits posted von Milw0rm, Securityforum, Osvdb

Hat jemand sowas hier? Oder einen Namen/Coder.. sowas gibts, hab ich gesehn, aber Google gibt mir nichts brauchbares :(

Hoffe ihr könnte helfen!

fred777
10.09.2009, 09:05
Habs jetzt nur für milw0rm gemacht, kannst ja noch erweitern ;)


use LWP::Simple;
print "\nMilw0rm highlighted entries..\n\n";
$resp = get("http://milw0rm.com");
@expl = ($resp =~ /style17">(.*)<\/a>/g);
foreach (@expl) { print $_."\n"; }

]=-antr4xx-=[
11.09.2009, 16:16
Um das nun in den Channel zu kriegen kannst du folgendes Modul benutzen:

http://search.cpan.org/~bingos/POE-Component-IRC-6.12/lib/POE/Component/IRC.pm (http://search.cpan.org/%7Ebingos/POE-Component-IRC-6.12/lib/POE/Component/IRC.pm)