Foro - Perl en Español

Hola a todos.

Supongamos que tengo una variable así:

$var1="perl es espectacular";

¿cómo sería la manera más sencilla de tener en $var2 "perl_es_espectacular"?

Gracias por la ayuda a todos.

Carlos

Hola,

Tengo el siguiente problema. Deseo generar una serie de combinaciones a partir de un conjunto de datos. Estuve investigando y al parecer existe un módulo en CPAN que hace esto muy fácil. El módulo es "Math::Combinatorics". Ya he jugado un poco con el código y va bien.

#! /usr/bin/perl -w

use Math::Combinatorics;

my $file = $ARGV;

open (FILE, $file);

my @n = <FILE>;
chomp @n;



print "combinations of 2 from: ".join(" ",@n)."\n";
print ...

Hola a todos.

Tengo una duda que siempre tuve porque tengo una ventana Tk que en un botón imprime un montón de veces hola mundo y otro que debería parar solo la función, pero no salir del programa.

use Tk;

$ven = MainWindow->new;

$ven->Button(-text=>"Conta",-command=>\&contar)->pack();
$ven->Button(-text=>"Para",-command=>\&para)->pack();

MainLoop;

sub contar {
for (1..99999) {
$ven->update;
print "hola mundo";
}
}

sub para {

}

Viendo el código no hay una forma de poder hacer lo que ...

Buen día, tengo una duda.

Tengo mi programa que contacta a una BD, por medio de use DBI;

Este mismo programa funciona bien en otros equipos pero en mi máquina truena.

Tengo Perl
This is perl, v5.8.4 built for sun4-solaris-64int
(with 31 registered patches, see perl -V for more detaen un Solaris, con Oracle 9.0.1.

El Oracle funciona bien: puedo entrar por comandos y me responde la base de datos.

Aquí la cosa es ...

Hola a todos.

Tengo un problemilla con los tipos de comillas en Perl.

El caso es que esta función funciona perfectamente bajo MacOSX. Pero al pasarlo a Debian me da el siguiente error: sh: Syntax error: Unterminated quoted string.

sub get_xml{
$mac = Extr::get_mac();
$get_xml=`/usr/bin/wget --no-check-certificate '$Conn::RUTA/c_igeneral.php?mac=$mac&xaSj1=$Conn::PASS' -O $Conn::HOME/general.xml`;
return $get_xml_particular;
}

He probado poniendo en vez de variables, el string a pelo, y nada. El problema me lo da, creo, la comilla simple "'". ...

Hola.

Ando teniendo una duda porque estoy queriendo comprobar que haya HTML activo en una página pero no me puedo comprobar bien.

Porque en PHP hay una función htmlentities() o htmlspecialchars() que codifican las cadenas HTML para que no estén activas.

Mi duda es cómo poder detectar HTML realmente activo en Perl.

¡Hola!

Necesito saber la fecha en la que la otra persona se tomó la foto.

El tema es que me la mandó en un mail y cuando la bajo la fecha de creación me aparece en el momento en el que se bajó.

¿Existe alguna forma de saber cuándo la otra persona la creó en su PC?

Desde ya, muchas gracias...

Hola, mi nombre es Pablo, soy usuario de TeX/LaTeX hace bastantes años (en entornos Linux y Win32) y tengo instalado MikTeX2.8 junto a Active Perl.

El problema se me presenta con el siguiente script Perl «pst2pdf» de H.V (a cargo de mantener y desarrollar los paquetes PsTricks y compañía)

El script funciona, pero no en forma correcta, con la línea
print PDF "\\IncludeGraphics{$imageDir/$name-tmp-$IMGno$Iext}";

escribe en el fichero final, pero, agrega un .\ de la ...

Hola a todos.

Tengo el siguiente texto en la variable $cosa:

hola.chau

if ($cosa=~/(.*).(.*)/) { # Mal !!!!
}

Mi simple duda es cómo separar hola y chau mediante el punto.

Hola, de nuevo =P.

Les cuento que soy un feliz usuario de una Mac, la cual tiene luces bajo las teclas que se manejan con sus correspondientes teclas en el teclado. Las luces funcionan perfectamente: al modificar un archivo con un número se encienden y se cambia la intensidad. Vi por ahí que había un script para bindearlo a las teclas y así poder cambiarlas con las del teclado, pero sin embargo, ya que estoy ...