Foro - Perl en Español

Necesito ayuda con un script que genera un string que contiene la @ como carácter.
Leí por ahí que tenía que poner el \ para que me imprimiera la @, pero me lo está tomando como un retorno de carro y el string sale cortado en dos.
¿Que puedo hacer para imprimir la @?

Ejemplo de evolución de una solución Perl (unas de las posibles).

Perl permite encontrar una solución rápida, pero eso es lo que dicen los 'expertos' del lenguaje.
Pocas veces se acuerdan de los sufrimientos por los que pasaron mientras aprendieron con este lenguaje de las 'mil caras'.
Los novatos están cansados de escuchar que un problema se puede resolver de diez formas distintas, cuando ellos sólo quieren una para terminar cuanto antes el problema que ...

Hola a todos, espero me puedan ayudar porque no sé porque no
se conecta.

Gracias de antemano.


Síntoma: Al compilar los scripts de PERL con perl2exe (IndigoStar) que usan la librería Net::SSH::W32Perl, los ejecutables no funcionan.

(Mandan mensaje de 'No provider available')
El script s establece la conexión y retorna resultados, pero el
ejecutable no.


Salida:

D:\ISAP-6.2\Source\Work>ssh_test
W2LZDXRR01: Reading configuration data /.ssh/config
W2LZDXRR01: Reading configuration data /etc/ssh_config
W2LZDXRR01: Connecting to 199.228.23.169, port 22.
W2LZDXRR01: Socket ...

He leido los tutoriales sobre gráficos de la página y de CPAN (los de GDGraph) y no he encontrado lo que solucione mi problema. Deseo crear un gráfico donde los datos del eje X no se encuentren equiespaciados, sino que los datos correspondan a puntos reales, es decir que el eje X sea numérico. He probado colocando x_tick_number => 'auto'. Pero no es una muy buena solución. Existe algun módulo que permita hacer gráficos con ...

Holagente, quiero hacer una pequeña aplicación en donde coloque el estado de un servidor...O sea, en nivel de carga del CPU, el uso de memoria que tiene, etc.

hay un comando TOP que es muy bueno y muestra todo eso, pero está en línea de comandos...

Como puedo hacer para darle una interface web, hay algún módulo de PERL que birnde esa info ?

además, ¿Hay alguna foma de saber la temperatura interna del microprocesador ...

Hola a todos, les escribo porque tengo una pequeña duda... cómo eliminar correctamente la ejecución de un CGI, cuando se produce una instrucción determinada... ej:

Code: Seleccionar todo

(otra parte del script)

$id=param('id');

my @checkid= `ls /red/numero/`;
foreach $variable(@checkid) {
    if($id eq $variable)
    {
        print("Ya hay una red creada con ese numero") || die (¿instrucciones?)
    }
}

(resto del script a realizar sino se cumple la condición)

¿¿¿ Cómo podría hacerlo ???

¡¡Muchas gracias a todos otra vez!!. ...

A ver, quien lo hace, un lector PDF y POD de forma gráfica, la unic relga es que el lector tiene que se propio (nada de eso de utilizar Gtk2::Ex::Pod o cosas por el estilo) pero si se puede utlizar un lector (a memoria) de PDF, siempre y cunado no lo "pinte" en la pantalla.
:wink:

Hola, espero que me puedan ayudar

Tengo una variable referenciada "$all_details" que es un hash de arreglos de hashes, al hacer un print Dumper obtengo
lo que aparece mas abajo.. ("Se ve mas claro al ver el codigo fuente del Dumper")

Como puedo recorrer esto, de tal forma de ir obteniendo los valores finales ?
un dato.. es que tengo un arreglo con todos los indices, en este caso:


foreach $code (keys %{$codes}) { ...

TENGO EL SIGUIENTE CODIGO Y NECESITO CONECTARME A LA BASE DE DATOS PERO ME PRODUCE UN ERROR... NO SE QUE ESTA MAL...
#!/usr/bin/perl -d
use DBI;
use CGI;
$dbh=DBI->connect('DBI:mysql:host=208.232.83.166:database=SistemaEscolar',root,SD2);
$co=new CGI;

$cgicontrol=$co->param("control");
$cgipassword=$co->param("password");

$control.="";
$control.=$cgicontrol;
$control.="";

$password.="";
$password.=$cgipassword;
$password.="";


$sth=$dbh->prepare("select * from alumnos where control=$control and password=$password");
$sth->execute;


if(($control,$nombre,$password)=$sth->fetchrow())
{$bandera=1;
print $co->center($co->h1('Numero de Control:'));
print $control;
print $co->center($co->h1('Nombre:'));
print $nombre;
}
$sth->finish;
$dbh->disconnect;

print $co->header,
$co->start_html
(
title=>'Envio de datos al y desde el servidor ...

Hola.
Tratando de hacer un tutorial, para poner aqui, me encontre en este problema.
Mirando uno ejemplos de Win32::Process::Info encontre que para saber el PID del programa no usan $$ si no que usan Win32::Ole, asi que, quiero saber el PID de el programa, ¿Uso $$ o uso Win32::Ole?
Gracias.