Foro - Perl en Español

Hola, saludos a todos, el tema es que cuando identifique un tag HTML de cierre inmediatamente ponga nueva línea para separarlos.

Ejemplo: si la entrada es
<h1><p>...askdfjal</p></h1>
--indentado --> <br>
La salida debe ser
<h1><p>laskfajslkfj</p>
</h1>
---- indentado--> <br>

El código me separa bien, pero no respeta las indentaciones, o sea es:
<h1><p>laskfajslkfj</p>
</h1>
<br> #br no está indentado y debería

Por ahora el tema optimización no es primordial, sino que pueda entender, luego mejoramos ...

Agradecería si me pudiesen indicar qué módulos puedo usar, bajo Windows, que me permita hacer gráficos estadísticos tipo: histogramas, pies, etc.

Muchas gracias, :)

Hola a todos:

Si tengo un valor en la variable $miliseg = 66200 (66,200 s) ¿cómo puedo hacer para pasar a este formato: 01:06,200 (min:s)?

Si hago, para obtener la cantidad de minutos: $min = $miliseg / 60000, obtengo una cifra con decimales, y solo me interesaría quedarme con la parte de la izquierda de la cifra (que no me acuerdo cómo se llama...). El resto lo podría hacer con $s = ($miliseg % 60000) ...

Hola. ¿Cómo están? He creado un script de conexión FTP que funcionaba perfectamente y desde ayer me está dando los siguientes errores:

Global symbol "$arch_local" requires explicit package name at huawei.pl line 5.
Global symbol "$puerto" requires explicit package name at huawei.pl line 6.
Global symbol "$source" requires explicit package name at huawei.pl line 7.
Global symbol "$username" requires explicit package name at huawei.pl line 8.
Global symbol "$passwd" requires explicit package name at ...

Hola a todos,

Mi pregunta es bastante basica asi que supongo que podréis echarme un cable rápidamente.

Lo que estoy intentando es simplemente cambiar de directorio; dicho de otra forma:
- estoy en DIR1
- ejecuto un miniscript desde dicho directorio que me haga cambiar al directorio DIR2
- finaliza el script y todavía sigo en DIR1 (me refiero al shell), cuando en realidad quisiera estar en DIR2 (he ahí mi problema...)

Para ello, he ...

El plazo de inscripción termina el 7 de mayo.

http://cevug.ugr.es/perl/

En una empresa en la que pensaba laborar como programador en PHP me pidieron lo siguiente:

Correct the preg shown in the form so that the news links and titles of main stories on http://www.eltiempo.com are found. To help you a bit, a preg is given that matches any url on the page. However, it's not correct yet, because it matches too much.
Preg:

Code: Seleccionar todo

%"([^\"]*)"%is

Bueno, en sí ellos ...

Al hacer varios require en una nueva librería de mi proyecto no sé si ya se han incluido en otros requires a los que estoy llamando. ¿Qué puedo usar para que los require no se vuelva a incluir? En C o C++ esto se controla con los #includes y con los #defined, ¿cómo lo hago en Perl?

Hola,

Tengo una consulta sobre cómo puedo deshabilitar el campo de texto en un formulario de manera que el usuario no cambie su información. Por ejemplo, en HTML se agrega al final del <input type=textfield ... DISABLED> y el usuario solo verá el contenido pero no lo puede modificar.

¿Alguien puede decirme cómo hago eso mismo en Perl usando la estructura de declaración de un:

$html = $query->newInput (
-regx => $characterset,
-intype => 'textfield', ...

Hola nuevamente.

¿Alguien podría ayudarme a entender este pedazo de código?

En especial yo necesito imprimir los valores de los atributos por separado... y no logro entender dónde él hace la operación para que se llene el valor.

## additional attribute handling ##

my @additional_attr = ();
my @additionalAttributes = getRequiredList('ADDITIONAL_REQUEST_ATTRIBUTES');
my @additionalAttributesStringType = getRequiredList('ADDITIONAL_REQUEST_ATTRIBUTES_STRING_TYPE');
my @additionalAttributesDisplayValue = getRequiredList('ADDITIONAL_ATTRIBUTES_DISPLAY_VALUE');

my $counter = 0;
foreach my $attribute (@additionalAttributes)
{
## determine the attribute
my $attVar;
if($additionalAttributesDisplayValue) ...