Foro - Perl en Español

Hola.

Me gustaría saber si utilizar estos dos módulos. Estoy intentado hacer un script que se conecte por SFTP desde una máquina Windows a Linux para traerme datos, y soy incapaz, tanto de instalar el módulo como de hacerlo funcionar.

Me da errores por todos los lados.

¿Alguna ayudita?

Muchas Gracias.

Buenas tardes, querría saber cómo puedo introducir una o más secuencias previamente coloreadas en un archivo de imagen '.png'. De manera final querría que se quedase el fondo blanco y dentro de ese fondo las secuencias.

Muchas gracias.

Buenas... pues resulta que quiero leer el contenido de un archivo (un certificado SSL) y meterlo en una array. Luego intento crear otro archivo para copiar el contenido de la array y me he dado cuenta de que en cada salto de línea (no entiendo el por qué) Perl mete un espacio en blanco... ¿alguien sabe por dónde van los tiros? ¿cómo podría solucionarlo? Seguro que hay alguna expresión regular que pueda utilizar, ¡pero soy ...

Hola a todos, tengo un par de dudas sobre local y undef.

Poseo este script el cual lo utilizo con cuatro opciones diferentes, traté (infructuosamente) de adaptarlo dentro de otro script (script-perl-pst2pdf-y-pdftex-t5369-30.html) con el que me han dado la mano en ocasiones anteriores, que sí utilizo con frecuencia, y me asaltan mis dudas con las maneras que tengo de leer el archivo de entrada (undef, local).

Sé que undef ...

Lo que quiero es ver si es posible en Perl o Apache algo, que cada página html retornada de una petición me reemplaze una URL por otra URL... Por ejemplo, si tengo una página web con un vínculo a pagina.com/mirar, sea cambiada a otrapagina.com/mirar.

Rara la pregunta.

Lo que quiero es lograr que cualquier petición que se haga a mi servidor la procese un programa Perl antes de que el servidor se ejecute, es decir, si llamo la URL

http://www.pagina1.com/curos/dato.php

antes de eso Apache pase esta URL a un programa verificar.pl que procesará el HTTP_REFERER y según de donde venga hará lo que tenga que hacer que realmente es redireccionar a lo mismo ...

Tengo el siguiente código que traducí de Perl a PHP:

$code = toma("http://www.melissadata.com/lookups/iplocation.asp?ipaddress=".$ip);

if (preg_match("/City<\/td><td align=(.*)><b>(.*)<\/b><\/td>/i",$code)) {
$re = preg_match("/City<\/td><td align=(.*)><b>(.*)<\/b><\/td>/i",$code);

print_r($re);

El gran problema es que solo me devuelve 1. He probado con $re o $re pero siempre devuelve nada o uno.

¿ Qué hice mal ?

La propuesta es hacer un programa en Perl que dibuje un tablero de ajedrez, junto con sus piezas, en una terminal.

No hay limitación de estilo (se puede hacer como se quiera), ni de tamaño, colores o disposición.

La única limitación es la de no usar ninguno de los módulos CPAN que dibujen el tablero de forma directa.

Tengo la siguiente tabla :

echo "<table border=1 style='margin: 0 auto;'>";
echo "<td><br><center>Titulo</center><br></td><tr>";
echo "<td>Final<td><tr>";
echo "</table>";

Lo que me molesta es ese espacio a la derecha en la tabla , no sé cómo corregirlo, lo he centrado y todo.

¿ Cómo evito este espacio ?

Hola. Tengo instalado "SQL Server Management Studio Express" y estoy tratando de hacer una conexión al servidor con Perl. El tema es que no sé cómo manejar bien este tema. El código con el que estoy probando es este:

use DBI;
my $host = 'localhost';
my $database = "probando";
my $user = "DODDY-701C8CB49\Doddy";
my $auth = "s3cr3t";

# DBD::ADO

$dsn = "Provider=sqloledb;Trusted Connection=yes;";
$dsn .= "Server=$host;Database=$database";

my $dbh = DBI->connect("dbi:ADO:$dsn",$user,$auth,{ RaiseError => 1, AutoCommit ...