Foro - Perl en Español

Necesito substituir todas las apariciones de texto entre <b> y </b> de un html por su correspondiente hipervínculo.

Por ejemplo,<b>pepito<b><b>fulanito</b>por<b><a href="http://www.pepito.com">pepito</a><b><b><a href="http://www.fulanito.com">fulanito</a></b>y quería saber si se puede hacer con un solo s//g.

Tampoco tengo claro si le pongo que coja lo que hay entre <b> y </b> que no me vaya a coger el primer <b> con el último </b>.

¿Alguna idea de cómo hacerlo?

¡Gracias!

Hola, chicos, a ver si me pueden dar una mano...

Estoy queriendo decodificar unos correos que me descargo, puesto que éstos vienen con codificación Quoted Printable (del Content-Transfer-encoding) para luego procesar los datos que vienen en este correo para varias cosas. Lo que lo encuentro raro es que a la hora de hacer una prueba sencilla como la siguiente:


#!/usr/bin/perl -w
use MIME::QuotedPrint;

$string = 'electr=C3=B3nico';
$string_decoded = decode_qp($string);
print "$string\n";
...

Hola, quería preguntar si alguien conocía algún módulo o forma de cambiar la IP por otra cualquiera. Solo busco que se cambie por otra aleatoria.

¿ Alguien sabe cómo hacerlo en Perl ?

P.d.: encontré esto en bash:
ipconfig/release

netsh interface ip set address name="Internet" source=static 1.1.0.0 255.255.255.0 192.168.1.1 1

netsh interface ip set address name="Internet" source=dhcp
netsh interface ip set dns "Internet" static none

Hola.

Estoy tratando de poner un anuncio en la "Bolsa de trabajo" pero no consigo que se publique. Parece que no pasa del moderador :( .

Por favor, ¿alguien me puede indicar las reglas para poner un anuncio ahí?

He mirado las reglas generales del foro pero tampoco especifican mucho.

Nuestra oferta es muy sencilla, es para que un programador de Perl nos realice trabajos esporádicos. No ...

Hola, ¿qué tal?

Estoy realizando algunas consultas SQL con un script hecho en Perl. Verán: obtengo unos registros los cuales requiero insertar en una tabla en Firebird, solo que al ejecutar el Procedure para el INSERT me marca este error:

conversion error from string "20140220161918" at copyEtiq.pl

por lo que llegué a la conclusión de que este formato no es legible para Firebird, es decir no puede insertar las fechas de esta manera.

¿De que ...

Soy nuevo en este asunto de las expresiones regulares, y no sé cómo hacer esto.

Tengo códigos de este tipo:

ppa009832m.g
ppa000331m.g
ppa026666m.g
ppa004700m.g
ppa011429m.g
ppa003984m.g
ppa010914m.g
ppa026327m.g

y quiero extraer solo lo que está antes de 'm.g'. Ejemplo: ppa009832

¿Cómo se puede hacer?

Saludos

Hola. Tengo dos fechas:

$date1 = ParseDate($fs);

####-->La variable $date1 siempre debe tener un valor porque fuerzo su captura, como ejemplo la variable date1 tendrá el valor de 2014/02/19 11:11:00

$date2 = ParseDate($fe);

####-->La variable $date2 le asigno el valor '0000/00/00 00:00:00' porque la variable $fe no ha sido capturada y es necesario calcular la diferencia entre $date2 y $date1. Por favor, ¿me podéis orientar si esta operación es correcta: ParseDate(0000/00/00 00:00:00),

para que en ...

Saludos a la comunidad.

Mi consulta: no sé si se habrá respondido en otro lugar, pero busqué y no encontré algo claro. El tema es bien simple:

¿Cómo descodifico un script previamente aplicada la codificación Acme::Pony?

Gracias a todos.

Hola a todos, vuelvo al foro con el siguiente problema. Trataré de explicarme de la forma más clara posible.

Dispongo de varios archivos de la siguiente forma:

\documentclass{article}
\usepackage{pstricks}
\tcbuselibrary{listings,
breakable,
skins}
\begin{document}
Este texto va acá
\begin{MYexample}
Bloque 1 que deseo extraer, acá van cosas como
\def alguna cosa
\psset{unit=0.5cm,
runit=0.5cm
}
\begin{pspicture}(0,3)(10,10)
\psdot(2,4)\pscircle(7,7){2}
% otras cosas
\psCircleTangents(2,4)(7,7){2}
\pcline(2,4)(CircleT1)

\end{postscript}
\end{MYexample}

Acá va más texto

\begin{MYexample}
Bloque 2 que deseo ...

¡Hola!

Tengo una matriz no cuadrada y quiero invertir los valores de sus filas y columnas. ¿Se puede hacer esto en Perl? Lo que quiero hacer es algo como:
A B C D
1
2
3
4
5
quede así:
1 2 3 4 5
A
B
C
D
Muchas gracias por cualquier colaboración.