• Publicidad

Fecha actual 2024-12-25 09:01 @417

News News of Proyectos

Site map of Proyectos » Foro : Proyectos

¿Estás desarrollando un proyecto, o piensas hacerlo? Pon aquí tu propuesta, lo más seguro es que alguien esté interesado en ayudarte.

Project ParanoicScan 1.7

Como primer programa del 2014 les traigo la nueva versión de mi ParanoicScan en su versión 1.5. Hace tiempo ciertas personas robaron el código fuente de la anterior versión de este programa. El tema es que no me molestó que usaran el código sino que solo le cambiaron el nombre del programa y el nombre del autor, no se molestaron en cambiar los nombres de las variables, solo cambiaron el nombre del autor. Por un ...
Read more : Project ParanoicScan 1.7 | Vistas : 4711 | Respuestas : 0


Shodan Tool 0.2

Un simple script en Perl que hice con la ayuda de explorer para realizar búsquedas en Shodan usando el API que hicieron para Perl.

El código.

#!usr/bin/perl
# Shodan Tool 0.2
# (C) Doddy Hackman 2013

# Install the dependencies
# sudo perl -MCPAN -e 'install CGI::Enurl'
# sudo perl -MCPAN -e 'install JSON::XS'
# sudo perl -MCPAN -e 'install HTTP::Request::Common'
# Install Shodan
# curl -OL http://github.com/downloads/achillean/s ... 0.3.tar.gz ...
Read more : Shodan Tool 0.2 | Vistas : 1789 | Respuestas : 0


Busco armar equipo de desarrolladores Perl

Hola, estoy buscando amigos compañeros, para formar un equipo o quizás no, pero para tener una Red de programadores de Perl y desarrollar aplicaciones que salgan al mercado...

La idea es promocionar el desarrollo en Perl, pero a la vez, saber quienes desarrollan de manera independiente y le gusta participar en proyectos cortos :)

Hay muchos trabajos para realizar, pero sencillamente pocos programadores disponibles...

¿¡ QUIÉN SE ...
Read more : Busco armar equipo de desarrolladores Perl | Vistas : 3061 | Respuestas : 5


DH ScreenShoter 0.1

Un simple script en Perl para sacar un screenshot y subirlo a Imageshack.

El código:
#!usr/bin/perl
#DH ScreenShoter 0.1
#Coded By Doddy H
#ppm install http://www.bribes.org/perl/ppm/Win32-GuiTest.ppd
#ppm install http://www.bribes.org/perl/ppm/Crypt-SSLeay.ppd

use Win32::GuiTest
qw(GetAsyncKeyState GetForegroundWindow GetWindowText FindWindowLike SetForegroundWindow SendKeys);
use Win32::Clipboard;
use Time::HiRes "usleep";
use LWP::UserAgent;

my $nave = LWP::UserAgent->new;
$nave->agent(
"Mozilla/5.0 (Windows; U; Windows NT 5.1; nl; rv:1.8.1.12) Gecko/20080201Firefox/2.0.0.12"
);
$nave->timeout(5);

$|++;

my ...
Read more : DH ScreenShoter 0.1 | Vistas : 1504 | Respuestas : 0


[Perl Tk] DH Bomber 0.2

Un simple script para mandar mensajes de correo a donde quieran. Para usarlo necesitan una cuenta en Gmail. Lo nuevo de esta versión es que usé otro módulo que hace que el script no tenga tantas dependencias como en la última versión.

El código:
#!usr/bin/perl
#DH Bomber 0.2
#Coded By Doddy H

use Win32::OLE;

head();

print "\n Host : ";
chomp( my $host = <stdin> );

print "\n Port : ";
chomp( my $puerto ...
Read more : [Perl Tk] DH Bomber 0.2 | Vistas : 1528 | Respuestas : 0


HTTP FingerPrinting 0.1

Un simple script en Perl para HTTP FingerPrinting o por lo menos lo intenta xDD.

El código :

#!usr/bin/perl
#HTTP FingerPrinting 0.1
#Coded By Doddy H

use LWP::UserAgent;

my $nave = LWP::UserAgent->new;
$nave->agent(
"Mozilla/5.0 (Windows; U; Windows NT 5.1; nl; rv:1.8.1.12) Gecko/20080201Firefox/2.0.0.12"
);

print "\n-- == HTTP FingerPrinting 0.1 == --\n";

unless ( $ARGV ) {

print "\n Sintax : $0 <page> < -fast / -full >\n";

}
else {

print "\n Getting Data ...
Read more : HTTP FingerPrinting 0.1 | Vistas : 1579 | Respuestas : 0


PasteBin Downloader 0.1

Un simple script en Perl para bajar códigos de Pastebin.

Pueden bajar solo uno o hacer que el programa busque enlaces de pastebin en una página y bajarlos a todos.

El código:


#!usr/bin/perl
#PasteBin Downloader 0.1
#Coded By Doddy H

use LWP::UserAgent;
use URI::Split qw(uri_split);
use HTML::LinkExtor;

my $nave = LWP::UserAgent->new;
$nave->agent(
"Mozilla/5.0 (Windows; U; Windows NT 5.1; nl; rv:1.8.1.12) Gecko/20080201Firefox/2.0.0.12"
);
$nave->timeout(10);

my $se = "downloads_pastebin";

unless ( -d $se ) { ...
Read more : PasteBin Downloader 0.1 | Vistas : 2103 | Respuestas : 2


VirusTotal Scanner 0.1

Un simple script para escanear un archivo mediante el API de virustotal.com La idea se me ocurrió cuando vi este script en Python hecho por Sanko del foro Underc0de.

Una imagen :

Imagen

#!usr/bin/perl
#VirusTotal Scanner 0.1
#Coded By Doddy H
#ppm install http://www.bribes.org/perl/ppm/JSON.ppd
#ppm install http://trouchelle.com/ppm/Digest-MD5-File.ppd
#ppm install http://www.bribes.org/perl/ppm/Crypt-SSLeay.ppd
#ppm install ...
Read more : VirusTotal Scanner 0.1 | Vistas : 1567 | Respuestas : 0


Imageshack Uploader 0.1

Un simple script para subir imágenes a Imageshack.

El código :


#!usr/bin/perl
#Imageshack Uploader 0.1
#Coded By Doddy H
#ppm install http://www.bribes.org/perl/ppm/Crypt-SSLeay.ppd

use LWP::UserAgent;

my $nave = LWP::UserAgent->new;
$nave->agent(
"Mozilla/5.0 (Windows; U; Windows NT 5.1; nl; rv:1.8.1.12) Gecko/20080201Firefox/2.0.0.12"
);
$nave->timeout(5);

head();

unless ( $ARGV ) {
print "\n Sintax : $0 <image>\n";
}
else {

my $your_key = "YOURKEY"; #Your API Key

print "\n Uploading ...\n";

my ...
Read more : Imageshack Uploader 0.1 | Vistas : 1448 | Respuestas : 0


AnonFiles Uploader

Traducción a Perl del programa hecho por $DoC llamado AnonFiles Uploader hecho para subir archivos a la página AnonFiles.


#!usr/bin/perl
#AnonFiles Uploader
#Original author: $ DoC
#Translations made by Doddy H
#
#ppm install http://www.bribes.org/perl/ppm/Crypt-SSLeay.ppd
#

use LWP::UserAgent;

my $nave = LWP::UserAgent->new;
$nave->agent(
"Mozilla/5.0 (Windows; U; Windows NT 5.1; nl; rv:1.8.1.12) Gecko/20080201Firefox/2.0.0.12"
);
$nave->timeout(5);

unless ( $ARGV ) {
print "\n Sintax : $0 <file>\n";
}
else ...
Read more : AnonFiles Uploader | Vistas : 1676 | Respuestas : 0


 

Identificarte  •  Registrarse


Estadísticas

Mensajes totales 36890 • Temas totales 7432 • Usuarios totales 1981

cron