Foro - Perl en Español

Hola, compañeros, tengo una duda.

El siguiente código me abre un fichero y elimina las palabras que no deseo, por ejemplo NOSIG, AUTO o 9999.

Esto lo hace correctamente, son cadenas fijas.
#!/usr/local/bin/perl
my $replacestring = "AUTO";
my $replacestring2 = "9999";
my $replacestring3 = "NOSIG";
#my $replacestring4 = "*V*";

open(my $infile,"<","metars.csv") or die $!;
open (my $outfile,">","outmetars.csv") or die $!;
while (<$infile>)
{
$_=~s/$replacestring//g;
$_=~s/$replacestring2//g;
$_=~s/$replacestring3//g;
# $_=~s/$replacestring4//g;
print $outfile $_;
}
close $infile; ...

Tengo un problema con este código:

print " test : ";
for my $num ( reverse 1 .. 5 ) {
print "$num.. ";
sleep 1;
}


Mi idea es que se muestre así
test : 5.. 4.. 3.. 2.. 1..

cada uno acá un segundo, pero el problema es que se muestra todo mal, primero el print() con test aparece al final; y segundo que el script tarda los 5 segundos ...

Hola.

En los últimos días, se está comentando la, a veces excesiva, importancia que la gente da al índice Tiobe de lenguajes de programación.

Basta con investigar un poco para comprobar que sus criterios de valoración son muy discutibles. Pero el caso es que mucha gente se fija en ese índice. Otros índices dan valores distintos. Y son más serios a la hora de hacer los análisis.

Pero bueno, si nos centramos en el índice ...

Hola, gente.

Tengo el siguiente código, para buscar posible puertos abiertos y crear conexiones.
sub vncscan {
my ($ip) = (shift);
my $ok = 0;

for ( ; $i < 13; $i++ ) {
$SIG{ALRM} = sub { print "alarm\n"; };
my $vnc = IO::Socket::INET->new( Proto => "tcp", PeerAddr => $ip, PeerPort => $port, Type => SOCK_STREAM );
alarm(2);
if (<$vnc>) {

my $info = <$vnc>;
print $socket "PRIVMSG $temp ...

Hola, buenas noches.

¿Alguna sugerencia para crear un Cliente/Servidor sencillo?

Buenas tardes, maestros de Perl en español, tengo el siguiente inconveniente:

Tengo un CSV, que obviamente va separado por comas, pero a veces en la cadena (vista como texto), hay algo como esto

aquí va algo,aquí va algo más,"ESTO ES UNA CADENA, EN LA CUAL, NECESITO, ELIMINAR, TODAS, LAS COMAS QUE APARECEN, DENTRO DE LAS COMILLAS", aquí va algo más, y aquí algo más

Lo anterior es por poner un ejemplo.

He intentado varias combinaciones ...

¡Buenas!

Primeramente me presento. Soy Toni y estoy haciendo mis primeros pinitos con Perl aunque llevo bastante tiempo automatizando con VBS y Bash. Por un tema concreto de gestión de un Excel, me he puesto con Perl y he llegado a un punto sin retorno.

Seguro que es una tontería muy grande, pero he recorrido Internet en inglés y español y las búsquedas por

blank space passed argument perl

y todas sus variantes no me ...

Ya falta menos de una semana para la reunión europea de Perl. Este año es en Kiev, Ucrania.

Ya está publicada la agenda de actividades: cuatro días, ochenta conferencias, cursos y charlas, en tres auditorios simultáneos.

Hay más de cuatrocientas personas registradas, de treinta y siete países distintos, y setenta y dos grupos de usuarios.

¡Hola de nuevo! Estoy haciendo un programa de mutaciones aleatorias y he visto en muchos ejemplos esta orden, pero no sé lo que significa, ni si es imprescindible para el programa:

srand(time|$$)

Hola a todos.

Estoy tratando de instalar un módulo vía ppm.

Me sale el siguiente error o aviso:
Set up gcc environment - gcc.exe (rubenvb-4.5.4) 4.5.4
El caso es que no se instala el módulo Crypt::RSA.

Estoy intentándolo en un Windows 7 64bits (sobre ActivePerl 5.16), y no sé si es por esta plataforma por lo que no se puede instalar.

¿Alguna sugerencia?.

Hace mucho que no programo y ando algo oxidado ...