Foro - Perl en Español

Hola, tengo un archivo txt, y quiero mostrarlo de una forma ordenada... Por ejemplo, si está de la sig. forma:

alumnoa xxx alumno matricula grado
matricula xxx aaaaa aaaaaa aaaaaa
grado xxx ssssss sssss sssssss
alumnob sss ddd dddddd dddddd
matricula sss =======>
grado sss
alumnoc ddddd
matricula xxx
grado xxx

¿Podrías ayudarme con eso?

Hola, soy bastante nueva en Perl. Mi problema es que creé una tabla y necesito que por cada fila me genere un archivo txt, pero no conozco, ni encontré el funcionamiento de bind...

(acá está la tabla)

$mw1->Label (-text => "Informe", -font => 'ARIAL',-foreground=>'DARK BLUE') -> pack();
my $frame = $mw1->Frame()->pack();
my $T = $frame-> Table(-columns => 8, -rows => 11,-fixedrows => 1,-scrollbars => 'oe', -relief => 'raised');
$tmp_label = $frame->Label(-text => $i, -padx ...

Tengo el siguiente código:


#!/usr/bin/perl
use CGI;
use CGI::Carp qw(fatalsToBrowser);
use Mod_dir::buscar;
#use strict;
#use warnings;
print error;
#print "Content-type: text/html;charset=UTF-8\n\n";


$query = new CGI;
$query->charset('UTF-8');
print $query->header('text/html');
print $query->start_html({-title=>'', -style=>"../../Css/style_formulario.css"});
print $query->startform;
print"<div id=\"buscar\">";
print $query->div({id=>'bBuscar'},($query->submit({class=>'boton', -value=>'Buscar'})));
print $query->div({id=>'cajatext'},($query->textfield({class=>'bus', -name=>'busq'})));
print "</div>";
print $query->end_form;

my $value = $query->param('busq');

my $campo = buscar->new;
if ($value =~ //) {
my @resultado = @{ $campo->busqueda($value) };
print"<div id=\"tablaM\">";
print $query->start_table;
print $query->Tr($query->th( {id=>'tablaSubTitulo'}, ) ...

Hola, estoy intentando hacer un script en Perl para mandar un email en caso de que el disco alcance un porcentaje de uso determinado.

Uso el comando de sistema "mutt" al que invoco con la orden "system" pero tengo un problema al usarlo dentro del script.

system("mutt -s 'asunto' email\@dominio.com <<< 'texto'")

uso \@ para introducir la arroba, al ser una carácter reservado.
lo he intentado también con variables en lugar de introducir el texto ...

Hola. Estaba viendo esta web: http://www.ascii.cl/es/ y quería preguntar si había alguna forma de hacer lo mismo en Perl; me refiero a poner una URL y codificarla como la web dice.

¿ Alguien me puede ayudar ?

Estoy buscando alguna forma de hacer una conexión POP3 SSL al puerto 995.

Encontré esto: http://www.example-code.com/perl/pop3_ssl.asp pero necesito otra alternativa.

También intente con el módulo http://search.cpan.org/~gbarr/libnet-1.22/Net/POP3.pm pero no sé cómo hacer la conexión POP3 SSL al puerto 995.

¿ Alguien puede ayudarme ?

Hola. Me gustaría que alguien pudiera ayudarme con un problema que me ha surgido de repente y que antes no me pasaba. Resulta que cuando creo el .exe de mi programa y lo ejecuto, cuando le doy a un botón que me comprueba si las direcciones URL están activas, es decir, si se cargan correctamente, me dice los siguientes errores que antes no me pasaba. Cuando he mirado la documentación del módulo , me dice ...

Hola una vez más. Tengo una duda.

¿Yo puedo meter variables de Perl en código JavaScript? Me explico: quiero colocar en un formulario (hecho con cgi) unos combos (listas) dependientes y por lo que leí solo puedo hacerlo con JavaScript, entonces por eso quiero saber si puedo meter variables de Perl en JavaScript, gracias.

He empezado a realizar mi práctica profesional junto a Perl y llevo unas semanas aprendiendo gracias a este foro.

Mi consulta, que no pude encontrar en temas antiguos, es esta:

Estoy trabajando con Catalyst y HTML::FormFu.

El tema es que le paso valor mediante un array a los select que tengo en el .yml:

...
my @ambientes = ("Produccion", "Beta", "Staging");
my @ambientes_h;
foreach (@ambientes) {
push(@ambientes_h, );
}
...
$select_ambientes->options(\@ambientes_h);
...

Esto funciona ...

El archivo que necesito transformar tiene tres hojas (vfp, corriente, datos).

En vfp extraigo las variables $vnominal, $mPT, $pacep y $mpot.
En corriente extraigo las variables $CT, $CENS.
En datos extraigo once columnas de un mínimo de 2880 datos.

La hoja de datos es la que transformo a texto y la columna de fechas las transformo a un formato conveniente.

La hoja de datos está así:



Esta conversión la realizo con la ayuda del ...