Foro - Perl en Español

Tengo un archivo del siguiente tipo:

SEQ 1 KSTYRTPNFDDVLKENNDADKGRSYAYFMVGAMGLLSSAGAKSTVETFIS 50 1EZV
STR TTTTT TTTTB TTTTTHHHHHHHHHHHHHHHHHHHHHHHHHHHHHH 1EZV
REM 1EZV
REM . . . . . 1EZV
SEQ 51 SMTATADVLAMAKVEVNLAAIPLGKNVVVKWQGKPVFIRHRTPHEIQEAN 100 1EZV
STR H TTTTT EEEEGGG TTTEEEEEEETTEEEEEEE HHHHHHHH 1EZV
REM 1EZV
REM . . . . . 1EZV
SEQ 101 SVDMSALKDPQTDADRVKDPQWLIMLGICTHLGCVPIGEAGDFGGWFCPC 150 1EZV
STR GGGTTTT GGG TTTTTEEEEE TTTTT EETTTTTT EEETT 1EZV
REM 1EZV
REM . . . 1EZV
SEQ 151 HGSHYDISGRIRKGPAPLNLEIPAYEFDGDKVIVG 185 1EZV
STR TTEEETTTT EEE EEEETTEEEE ...

Buenas a todos en el foro.

Necesito hacer una expresión regular pero la verdad no me queda; en ella trato de buscar un archivo que contenga una cierta cadena pero la verdad no le hallo, siempre han sido mi coco las expresiones regulares entre otras... :oops:

mi expresión consta de los siguiente parámetros...

~ /$variable X . Y /

$variable = es el único dato que quiero ...

Code: Seleccionar todo

Status: 302 Found Location:
/bin/error?error=Your script produced this error
A insecure%20dependency%20in%20open%20while
%20running%20setgid%20at%20program.cgi%20line%20236. URI: Content-type: text/html

Gracias por la ayuda.

Hola, buenos días, tengo un problemilla con mi programa, lo que estoy haciendo es lo siguiente:

En el cgi X, tengo una referencia, por la cual paso 3 parámetros: planta, maq y sub.

<td colspan=50 align=center bgcolor=silver>
<a href=\"microbiologico.cgi? planta=$GrupoExtranet\&maq=2&sub=$d\">

entonces en el cgi Y, si le doy print $planta, $maq y $sub, sí me las muestra al inicio del cgi, pero conforme va avanzando el cgi ya no me respeta el valor y no ...

Hola a todos

Si uso un servidor gratuito con capacidades de CGI en Perl tales como

www.netfirms.com
www.tripod.com
o cualquier otro

Quisiera saber cuáles módulos se encuentran instalados, ¿cómo lo hago?

Alguna vez vi un código en un lugar de la red que servía para mostrar los módulos instalados, pero la verdad no recuerdo dónde y ni lo encuentro.

Gracias por su ayuda.

Agradecería si me pudiesen asesorar acerca de lo siguiente: tengo desarrollado varios sistemas en Perl, de tipo Cliente Servidor en los que los usuarios interactuan con el Servidor vía web a través de su browser.

Mi intención es cambiar la estética, hoy en día trabajo con HTML. ¿Es factible incorporar en el código Perl Tk, o éste no sirve para trabajo web?

Bueno, ¡¡¡¡MUCHÍSIMAS GRACIAS!!!! :D

Hola a todos los usuarios de esta comunidad.

Soy un programador y uso casi que exclusivamente Perl a pesar de que mi trabajo de grado por allá en el 2000 lo hice en Visual Basic.

He sido usuario de foros del web pero veo que Kidd ha hecho un trabajo magnífico con perenespanol.

Espero hacer muchas preguntas y aprender; además también espero aportar desde mis humildes conocimientos en este maravilloso lenguaje de programación.

Trabajo en ...

Resulta que hoy me levante mal... y se me olvidó mucho de lo poco que sabía de Perl. Ahora mi problema es hacer una función que me retorne un array de hash. El nombre de los campos los tengo en un array y son los que serán las Key y el valor lo tengo en otro array que serán los valores para los KEYS para lo que tengo:

my %dats;
$registros = "5||22junio.jpg||tumb005.jpg||1||22||06||2008";
$registros = ...

Tengo un módulo que lo uso así
package seguimiento;

use strict;
use lib('/home/bitacor4/public_html/lib');
use lib('/home/bitacor4/public_html/modulos');
use base 'CGI::Application';

use CGI::Application::Plugin::DBH (qw/dbh_config dbh/);
use CGI::Application::Plugin::ConfigAuto (qw/cfg cfg_file/);
use CGI::Application::Plugin::Session;
use CGI::Application::Plugin::Authentication;
use HTML::GoogleMaps;
use CGI::FormBuilder;
use Data::Dumper;
use FILE::kreader qw(kread); # este es mi módulo

Software error:
"kread" is not exported by the FILE::kreader module
Can't continue after import errors at ../modulos/seguimiento.pm line 16
BEGIN failed--compilation aborted at ../modulos/seguimiento.pm line 16.
Compilation failed in require at ...

Buenas....

Quiero buscar un archivo en una ruta donde hay más de 100 directorios... pero en la librería Net::FTP no encontré ningún comando que me ayude a buscar un archivo dentro de todos esos directorios,.. no sé si alguien aquí sepa cómo puedo hacerle...

También busqué en esta librería... Net::FTP::File... pero nada.

Ni sé si exista una librería que me permita buscar archivos dentro de una conexión con FTP...

¡¡ Gracias !!