Foro - Perl en Español

Hola a todos/as,

Soy nuevo en esto ;-), y he intentado hacer pruebas con unos cgis copiados de un libro ("Superutilidades para Webmasters"), muy interesantes en la teoría, en la que el usuario puede generar las bd que desee desde un html, y trabajar con ellas posteriormente.

Cuando rellenamos los datos en el html, llama a "crearbd.cgi":

#!/usr/bin/perl

require 'cgi-lib.cgi';

&obtenparametros;

print "Content-type: text/html\n\n";
$nombres=$entrada{'nombrecampos'};
$clases=$entrada{'clasecampos'};
$tipos=$entrada{'tipocampos'}; ...

Hola a todos. He aquí de nuevo necesitando vuestra ayuda mientras me voy sumergiendo en este lenguaje tan interesante. Resulta que he creado un formulario en HTML que envía un sólo campo (el del nombre) mediante POST al cgi siguiente.

#! /usr/bin/perl -w

use CGI qw/:standard/;
my $FORM;
my $nombre;
#my $buffer;
my $numero;
$numero = 5;
print "Content-type: text/html\n\n";
read(STDIN, $FormData, $ENV{'CONTENT_LENGHT'});

@pairs = split(/&/, $FormData);

foreach $pair (@pairs)
{
($name, $value) = split(/=/, ...

Hola.

Me llamo Alfonso y estoy empezando con esto del Perl y en general con todo el mundo de los sistemas medios (UNIX y Windows), vengo de los mainframes de IBM y todo esto es nuevo para mi.

Tengo que generar unos 500 scripts de UNIX que cargan una base de datos y quería generarlos de golpe a partir de un fichero donde tengo el nombre del script y la línea que tiene que ejecutar, ...

Hola, tengo un archivo con la siguiente características:
1. FN ISI Export Format
2. VR 1.0
3. PT J
4. AU Porras, MD
Otro, AR
Y OTRO, OFG
5. TI Three Venezuelan literary journals of the 1960s and the problem of
culture
6. SO REVISTA IBEROAMERICANA
7. LA Spanish
8. DT Article
9. C1 Univ Simon Bolivar, Caracas 1080, Venezuela.
Otra Univ Simon Bolivar, Caracas 1080, Venezuela.
Y OTRA Univ Simon Bolivar, Caracas 1080, Venezuela. ...

Compañeros,

tengo esta rutina y quiero hacer que capture sólo los códigos de la forma
<a href="http://www.vilaweb.cat/www/noticia?LOQUESEA"

Cómo lo puedo hacer?? Lo he provado con este codigo...

Code: Seleccionar todo

sub getLinks
   {
   my @urls = @_;
   my %hash;
   $prefixurl= "http://www.vilaweb.cat/www/noticia?";

   foreach my $url ( @urls )
      {
      #while ( $url =~ /href="(.+?)"/gi )  #funciona!
      while ( $url =~ /href="$prefixurl"+?"/gi )
      {
         $hash
            { $1 } = 1 unless $1 =~ /#/;
      }
   }

   %hash;
}

pero no ...

Buenas.

Tengo un script en perl que recoge variables de entorno de Windows
.....
$AgentDir = $ENV{"AgentDir"};
.....

y por lo que he visto en las maquinas que utilizan la versión "perl 5.004_02"
no funciona quedando vacía la variable, en las maquinas con la versión "v5.6.1" funciona sin problemas.

¿Alguien recuerda si en la versión 5.004_2, las variables de entorno de windows definidas por el usuario tienen algún problema? he comprobado que las variables del ...

Hola todos:

A partir de hoy inicia oficialmente el "Primer Concurso de Tutoriales de Perl en Español", para ver las bases del concurso por favor lean el anuncio:
viewtopic.php?t=839

Les pido que pasen la voz, se ha dado bastante tiempo para dar chance a que la gente conozca acerca del concurso y manden sus tutoriales.

Por favor usen este mismo tópico para cualquier duda o comentario que tengan acerca ...

Buenos días,

A ver, tengo un fichero con un texto en una variable y necesito pasarlo al formato de una palabra por línea. Concretamente, necesito cada palabra y cada signo de puntuación en una línea distinta,

alguna ayudita? gracias de antemano! :wink:

Hola todos:

Pues aquí con la noticia de que este mes de Marzo estamos llegando a níveles históricos en cuanto a visitas con el sitio.

Durante el mes hemos estado recibiendo un promedio de 700 visitas diarias, así es, estoy hablando de visitas únicas NO hits. Para cuando finalice el mes, el sitio habrá sido visitado por 20,000 personas.

Diariamente se leen nuestros tutoriales un promedio total de 2,000 veces, lo cual a finales del ...

Hola, tengo un problema.

Estoy haciendo un sistema de smileys en un foro hecho en Perl y tengo un drama con el código de sustitución.

Por ej., quiero hacer que al poner ':)' se reemplace por una carita. Pero no entiendo bien el tema de poner las '\' para que no tome a los ':' y ')' como símbolos de Perl... ¿me entienden?

Este es el código que tengo:
$body =~ s/#1//g;
La ...