Dejo un ejemplo de lo que se puede hacer con este módulo:
''=~('(?{' .(('`')|
'%') .''. ('['
^'-' ).+( '`'|'!') .''. ('`' |',' )."\"".( '['^'+').(
'['^ ')') .''. ('`' |')' ).('`' |'.' ).+( '['^ '/') .''.
('{'^'['). '\\' .'"' .('{'^ '+') .''. ('`' |'%' ).+(
'['^ ')').(('`')| ',') .''. ('{'^"\[").( '`'| '%')
.''. ('`' |'.' ).+( '{'^ '[') .''.
('`' |'%' ).+( '['^ '(') .''. ('['
^'+' ).("\`"| '!') .('`'|'.').( '`'|'/') .''. ('`'
|','). ...
-
- Publicidad
Fecha actual 2025-01-31 04:07 @213
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.Perl, CGI y Template Toolkit
Hola a todos, acá les muestro un ejemplo de como empezar a trabajar con perl-cgi y Template Toolkit.
Lo primero que debemos hacer es crear el template que guardaremos en la misma carpeta que el archivo .pl.
template.tt2 (Preferiblemente puedes omitir la extensión tt2).
<html>
<head><title>Carta para </title></head>
<body>
<p>Gente de , su atención por favor.</p>
<p>Soy el Capitan , que destruiré su planeta</p>
<form action="/formu.html" method="POST">
<input type="submit" value="Volver">
</form>
</body>
</html>
Seguido creamos ...
Lo primero que debemos hacer es crear el template que guardaremos en la misma carpeta que el archivo .pl.
template.tt2 (Preferiblemente puedes omitir la extensión tt2).
<html>
<head><title>Carta para </title></head>
<body>
<p>Gente de , su atención por favor.</p>
<p>Soy el Capitan , que destruiré su planeta</p>
<form action="/formu.html" method="POST">
<input type="submit" value="Volver">
</form>
</body>
</html>
Seguido creamos ...
Read more : Perl, CGI y Template Toolkit | Vistas : 596 | Respuestas : 2 | Foro : Básico
Números aleatorios que siempre suman 1
Hola amigos,
Estoy tratando de hacer una rutina que genere por vez un array de números aleatorios cuyos valores siempre sumen 1. Me explicaré mejor con un ejemplo:
¿Alguien tiene alguna idea creativa de cómo hacer esto?
Saludos,
DW
Estoy tratando de hacer una rutina que genere por vez un array de números aleatorios cuyos valores siempre sumen 1. Me explicaré mejor con un ejemplo:
- Code: Seleccionar todo
DATO NÚMERO
1 0.022
2 0.023
3 0.033
. .
. .
. .
21 0.064
22 0.058
23 0.049
24 0.029
------
SUMA -> 1.000
¿Alguien tiene alguna idea creativa de cómo hacer esto?
Saludos,
DW
Read more : Números aleatorios que siempre suman 1 | Vistas : 1865 | Respuestas : 4 | Foro : Intermedio
Cálculos estadísticos a partir de un número
Hola, soy nuevo en el foro y en el tema de la programación.
Tengo un problema respecto a un programa que debo programar para un trabajo, el cual debe reconocer un número ingresado como palíndromo, y a partir de este número, debe encontrar la moda, ordenar de mayor a menor y dar el máximo y el mínimo de los elementos del palíndromo que se ingrese.
He logrado avanzar algo en él, sin embargo hay algo ...
Tengo un problema respecto a un programa que debo programar para un trabajo, el cual debe reconocer un número ingresado como palíndromo, y a partir de este número, debe encontrar la moda, ordenar de mayor a menor y dar el máximo y el mínimo de los elementos del palíndromo que se ingrese.
He logrado avanzar algo en él, sin embargo hay algo ...
Read more : Cálculos estadísticos a partir de un número | Vistas : 930 | Respuestas : 6 | Foro : Básico
Cómo transformar una URL
Hola
Ando buscando transformar todas las URL de un archivo de texto. Ejemplo:
Que estas URL
se transformen en esto
O sea, que la URL termine en la parte ?id=.
Ando buscando transformar todas las URL de un archivo de texto. Ejemplo:
Que estas URL
- Code: Seleccionar todo
http://www.pixelache.ac/nuage-blog/index.php?option=com_content&task=view&id=38
http://www.ifm.ac/index.php?id=businesstraining
se transformen en esto
- Code: Seleccionar todo
http://www.pixelache.ac/nuage-blog/index.php?option=com_content&task=view&id=
http://www.ifm.ac/index.php?id=
O sea, que la URL termine en la parte ?id=.
Read more : Cómo transformar una URL | Vistas : 933 | Respuestas : 1 | Foro : Intermedio
Filtrar palabras de un código fuente
Hola gente, ¿qué tal?, Para empezar soy nuevo en este foro así que antes que nada felicitarlos.
Bueno, vamos al grano. He realizado un pequeño script en Perl, el cual FUNCIONA.
Pero necesito ajustar más los parámetros... El script lo que hace es muy simple: ingreso un HASH md5; y éste lo ingresa en una base de datos: una web donde contiene muchos hash con sus 'valores' desencriptados.
Es decir, el user ingresa un hash, ...
Bueno, vamos al grano. He realizado un pequeño script en Perl, el cual FUNCIONA.
Pero necesito ajustar más los parámetros... El script lo que hace es muy simple: ingreso un HASH md5; y éste lo ingresa en una base de datos: una web donde contiene muchos hash con sus 'valores' desencriptados.
Es decir, el user ingresa un hash, ...
Read more : Filtrar palabras de un código fuente | Vistas : 1580 | Respuestas : 3 | Foro : Avanzado
Alternativas al uso de tie
Hola a todos, tengo un pequeño problema con el uso de tie()... Resulta que necesito que dos procesos diferentes accedan al mismo tiempo a ficheros de serialización que se han creado con tie(), pero buscando en Internet me encontré con que esto no es posible...
Lo que quisiera saber es si existe otro módulo que haga lo mismo que tie(), pero que sí me permita acceso simultáneo al fichero. O que al menos en determinado ...
Lo que quisiera saber es si existe otro módulo que haga lo mismo que tie(), pero que sí me permita acceso simultáneo al fichero. O que al menos en determinado ...
Read more : Alternativas al uso de tie | Vistas : 1766 | Respuestas : 10 | Foro : Intermedio
Falta un registro en la lectura de un fichero
¿Qué tal...? Tengo un problema con mi programa... Ya que hace lo que tiene que hacer... pero no me hace el ciclo completo... Este es mi código:
#!usr/bin/perl
use strict;
use BeginPerlBioinfo;
open (my $fh, $ARGV) or die "Error al pedir el Archivo.\n";
#Declaracion e iniciacion de variables
my $record;
my $dna;
my $annotation;
my %fields;
my $library = $fh;
while (<$fh>)
{
$record = get_next_record($fh);
#Parseo se secuencia y anotacion
($annotation, $dna) = get_annotation_and_dna($record); ...
#!usr/bin/perl
use strict;
use BeginPerlBioinfo;
open (my $fh, $ARGV) or die "Error al pedir el Archivo.\n";
#Declaracion e iniciacion de variables
my $record;
my $dna;
my $annotation;
my %fields;
my $library = $fh;
while (<$fh>)
{
$record = get_next_record($fh);
#Parseo se secuencia y anotacion
($annotation, $dna) = get_annotation_and_dna($record); ...
Read more : Falta un registro en la lectura de un fichero | Vistas : 984 | Respuestas : 8 | Foro : Básico
BeginPerlBioinfo.pm
¿Qué tal? Estoy haciendo un programa Perl que me pide la librería BeginPerlBioinfo... ¿Alguien sabe cómo la instalo o algo así? Porque es una librería de subrutinas que no tengo...
Gracias...
Gracias...
Read more : BeginPerlBioinfo.pm | Vistas : 1190 | Respuestas : 1 | Foro : Bioinformática
Varios arrays como parámetros a función
Si ejecuto esto...
#!/usr/bin/perl
use List::Util qw (sum);
use strict;
sub funcion
{
my ($dato) = $_;
my (@vector1) = $_;
my (@vector2) = $_;
print $dato."\n\n";
foreach (@vector1)
{
print $_."\n";
}
print "\n";
foreach (@vector2)
{
print $_."\n";
}
print "\n";
}
my $valor = "BIEN";
my @array1 = (
"hello",
"my",
"dear",
"friend"
);
my @array2 = (
">hola",
">que",
">tal",
">estas"
);
funcion($valor,@array1,@array2);
... obtengo esto ...
... ...
#!/usr/bin/perl
use List::Util qw (sum);
use strict;
sub funcion
{
my ($dato) = $_;
my (@vector1) = $_;
my (@vector2) = $_;
print $dato."\n\n";
foreach (@vector1)
{
print $_."\n";
}
print "\n";
foreach (@vector2)
{
print $_."\n";
}
print "\n";
}
my $valor = "BIEN";
my @array1 = (
"hello",
"my",
"dear",
"friend"
);
my @array2 = (
">hola",
">que",
">tal",
">estas"
);
funcion($valor,@array1,@array2);
... obtengo esto ...
- Code: Seleccionar todo
BIEN
hello
my
... ...
Read more : Varios arrays como parámetros a función | Vistas : 1103 | Respuestas : 2 | Foro : Básico
Last 10 active topics
Estadísticas
Mensajes totales 36890 • Temas totales 7432 • Usuarios totales 1981