Buenas tardes.
Despues de años de inactividad vuelvo a las andadas :D.
Mi problema es que deseo que me apoyen dándome una idea para obtener el sistema operativo de unos equipos de cómputo que haya en una red, esto mediante Perl. Ya investigué y encontré NMap, pero el problema es que esta aplicación que deseo hacer en Perl va a ser distribuida a varios usuarios y ...
-
- Publicidad
Fecha actual 2025-04-22 22:41 @987
News of Foro - Perl en Español
Site map of Foro - Perl en Español » Foro : Foro - Perl en Español
La comunidad de programadores en Perl de habla-hispana.Detectar sistema operativo de equipos en la red
Read more : Detectar sistema operativo de equipos en la red | Vistas : 4856 | Respuestas : 7 | Foro : Intermedio
Capturando exceso de datos
Hola gente, un saludo.
Una pregunta, a modo de información.
¿Es posible detectar exceso de información en un mismo intervalo de tiempo?
Es decir, 3 datos recibidos en 1 segundo.
Lo que necesitaría es, que si el programa recibe la misma orden 3 veces o más en 1 segundo, se cierre y evitar que colapse.
Una pregunta, a modo de información.
¿Es posible detectar exceso de información en un mismo intervalo de tiempo?
Es decir, 3 datos recibidos en 1 segundo.
Lo que necesitaría es, que si el programa recibe la misma orden 3 veces o más en 1 segundo, se cierre y evitar que colapse.
Read more : Capturando exceso de datos | Vistas : 629 | Respuestas : 1 | Foro : Básico
Validando dirección de correo (sin módulos)
Hola amigos, :)
Resulta que estoy validando un correo que recibo de la siguiente forma:
if ($mail !~ /\.org$/)
{
print "Es correcto\n";
} else {
print "Mail corrupto\n";
}
Lo que intento hacer, es validar el fin de la cadena $mail la cual tiene una dirección de correo.
Sólo quiero aceptar correos con terminación .com y .org, pero no obtengo el resultado que ...
Resulta que estoy validando un correo que recibo de la siguiente forma:
if ($mail !~ /\.org$/)
{
print "Es correcto\n";
} else {
print "Mail corrupto\n";
}
Lo que intento hacer, es validar el fin de la cadena $mail la cual tiene una dirección de correo.
Sólo quiero aceptar correos con terminación .com y .org, pero no obtengo el resultado que ...
Read more : Validando dirección de correo (sin módulos) | Vistas : 960 | Respuestas : 3 | Foro : Básico
rowspan dinámico
Hola.
Traigo los registros de una query y lleno una tabla con ellos.
La query trae una serie de componentes (primera columna de la query) y asociado a ellos una lista de eventos, cada componente posee eventos varios, y estoy llenando una tabla con el resultado de la query, por cada registro que arroja dibujo un <TR> conteniendo varios <TD> de acuerdo a los números de columnas que estoy consultando.
Sin embargo hay varios eventos ...
Traigo los registros de una query y lleno una tabla con ellos.
La query trae una serie de componentes (primera columna de la query) y asociado a ellos una lista de eventos, cada componente posee eventos varios, y estoy llenando una tabla con el resultado de la query, por cada registro que arroja dibujo un <TR> conteniendo varios <TD> de acuerdo a los números de columnas que estoy consultando.
Sin embargo hay varios eventos ...
Read more : rowspan dinámico | Vistas : 6925 | Respuestas : 14 | Foro : JavaScript
Buscar dato en archivo
Hola, amigos del foro.
Tengo un archivo que que tiene 5 columnas, la primera corresponde a fecha y hora juntos -AAAAMMDDHH- (por ejemplo, 2012010100) pero falta un día (es el año 2012 completo) e hice un script para que buscara esa fecha, y es obvio que estoy haciendo algo mal porque el resultado muestra una fecha, pero al revisar el archivo esa fecha sí está.
Agradezco mucho si me ayudan. Adjunto mi script:
#!/usr/bin/perl ...
Tengo un archivo que que tiene 5 columnas, la primera corresponde a fecha y hora juntos -AAAAMMDDHH- (por ejemplo, 2012010100) pero falta un día (es el año 2012 completo) e hice un script para que buscara esa fecha, y es obvio que estoy haciendo algo mal porque el resultado muestra una fecha, pero al revisar el archivo esa fecha sí está.
Agradezco mucho si me ayudan. Adjunto mi script:
#!/usr/bin/perl ...
Read more : Buscar dato en archivo | Vistas : 3446 | Respuestas : 16 | Foro : Básico
Usar un convertidor online desde perl
Otra vez pasando por aquí.
Tengo un problema. Al tratar de automatizar el uso de este convertidor online a través de perl usé el LWP::UserAgent pero no funciona. No funciona porque el servidor es algo especial y sumado a mis pocos conocimientos es fatal pero creo conocer lo básico. Paso a explicar lo que he podido analizar con este servidor:
Primero aislé el form que hace una petición POST al servidor (al parecer hacía una ...
Tengo un problema. Al tratar de automatizar el uso de este convertidor online a través de perl usé el LWP::UserAgent pero no funciona. No funciona porque el servidor es algo especial y sumado a mis pocos conocimientos es fatal pero creo conocer lo básico. Paso a explicar lo que he podido analizar con este servidor:
Primero aislé el form que hace una petición POST al servidor (al parecer hacía una ...
Read more : Usar un convertidor online desde perl | Vistas : 3822 | Respuestas : 10 | Foro : Web
Pasos para crear una aplicación CGI en Tomcat
He seguido estos pasos:
1. Modificar el archivo context.xml
<Context privileged="true"> ...
2. Modificar el archivo web.xml, descomentando lo referente a cgi
3. Crear el archivo "ejecutable.cgi", lo coloco en webapps/ROOT/miCarpeta/WEB-INF/cgi/ejecutable.cgi
El archivo "ejecutable,cgi" es el siguiente:
#!c:/perl/bin/perl.exe
print "Content-type:text/html\r\n\r\n";
print '<html>';
print '<head>';
print '<title>Hola desde un script Perl</title>';
print '</head>';
print '<body>';
print '<h2>Primer programa CGI</h2>';
print '</body>';
print '</html>';
1;
El servidor es Apache Tomcat, funciona correctamente, el ...
1. Modificar el archivo context.xml
<Context privileged="true"> ...
2. Modificar el archivo web.xml, descomentando lo referente a cgi
3. Crear el archivo "ejecutable.cgi", lo coloco en webapps/ROOT/miCarpeta/WEB-INF/cgi/ejecutable.cgi
El archivo "ejecutable,cgi" es el siguiente:
#!c:/perl/bin/perl.exe
print "Content-type:text/html\r\n\r\n";
print '<html>';
print '<head>';
print '<title>Hola desde un script Perl</title>';
print '</head>';
print '<body>';
print '<h2>Primer programa CGI</h2>';
print '</body>';
print '</html>';
1;
El servidor es Apache Tomcat, funciona correctamente, el ...
Read more : Pasos para crear una aplicación CGI en Tomcat | Vistas : 4018 | Respuestas : 9 | Foro : Web
Instalación de Oracle Instant Client y DBD::Oracle
en Linux (Redhat / Centos / Debian / Ubuntu)
«Existen para Nagios numerosos plugins para monitorizar Oracle, desde un simple tnsping para monitorizar la respuesta hasta diversas posibilidades para controlar el estado de tablespaces, instancias, discos,… Cuando abordamos la necesidad de usar dichos plugins siempre nos vamos a encontrar con dos posibilidades: su ejecución en local (servidor de Oracle) mediante un cliente para Nagios tipo NRPE o NSClient++ o su ejecución desde el propio servidor ...
«Existen para Nagios numerosos plugins para monitorizar Oracle, desde un simple tnsping para monitorizar la respuesta hasta diversas posibilidades para controlar el estado de tablespaces, instancias, discos,… Cuando abordamos la necesidad de usar dichos plugins siempre nos vamos a encontrar con dos posibilidades: su ejecución en local (servidor de Oracle) mediante un cliente para Nagios tipo NRPE o NSClient++ o su ejecución desde el propio servidor ...
Read more : Instalación de Oracle Instant Client y DBD::Oracle | Vistas : 896 | Respuestas : 0 | Foro : Pasando el rato
Generar nombres y apellidos al azar
Hola a todos,
tengo un problemilla de novato con Perl, a ver si alguien me puede echar una mano.
Tengo que hacer un programa que genere nombres y apellidos al azar y luego otro programa que lea el archivo donde se guardan los nombres y los cuente indicando por pantalla las veces que se repite cada uno.
Hasta aquí todo bien. El problema que tengo es que el nombre del archivo debe ser variable y ...
tengo un problemilla de novato con Perl, a ver si alguien me puede echar una mano.
Tengo que hacer un programa que genere nombres y apellidos al azar y luego otro programa que lea el archivo donde se guardan los nombres y los cuente indicando por pantalla las veces que se repite cada uno.
Hasta aquí todo bien. El problema que tengo es que el nombre del archivo debe ser variable y ...
Read more : Generar nombres y apellidos al azar | Vistas : 2573 | Respuestas : 4 | Foro : Básico
Base de datos
Tengo un problema con esta base de datos.
if ( database( "nicks", "nicks.db", "$nickR" ) ) {
screen(qq($BOTS{"nick"} P $UserDest :Ese nick ya se encuentra registrado, Por favor escoja otro.\n));
screen(qq($BOTS{"nick"} P $UserDest :Por ejemplo '$nickR$options' -> $aa\n));
}
else { &make_nick( "$nickR", "nicks.db", "nicks" ); }
sub make_nick {
my ( $regadd, $data, $dir ) = ( shift, shift, shift );
my ( $sec, $min, $hour, $mday, $mon, $year, $wday, $yday, $isdst ) ...
if ( database( "nicks", "nicks.db", "$nickR" ) ) {
screen(qq($BOTS{"nick"} P $UserDest :Ese nick ya se encuentra registrado, Por favor escoja otro.\n));
screen(qq($BOTS{"nick"} P $UserDest :Por ejemplo '$nickR$options' -> $aa\n));
}
else { &make_nick( "$nickR", "nicks.db", "nicks" ); }
sub make_nick {
my ( $regadd, $data, $dir ) = ( shift, shift, shift );
my ( $sec, $min, $hour, $mday, $mon, $year, $wday, $yday, $isdst ) ...
Read more : Base de datos | Vistas : 813 | Respuestas : 2 | Foro : Básico
Last 10 active topics
Estadísticas
Mensajes totales 36892 • Temas totales 7434 • Usuarios totales 1981