• Publicidad

Fecha actual 2025-01-11 00:01 @042

News News of Foro - Perl en Español

Site map of Foro - Perl en Español » Foro : Foro - Perl en Español

La comunidad de programadores en Perl de habla-hispana.

Operador >>

Buenas,

Lo busqué en Google pero no lo encontré...

Alguien me podría decir para qué es esta línea:

$retorno = $? >> 8;

Entiendo que le paso el estado de regreso de la última operación de ejecución de un proceso externo y lo guardo en $retorno, pero no entiendo que hace ese ">> 8". El ">>" es para agregarlo a un archivo, pero "8" no sé qué es... No existe ninguna variable que se llame ...
Read more : Operador >> | Vistas : 583 | Respuestas : 2 | Foro : Básico


Cambios de directorios con chdir

¡¡Hola!!

Estoy tratando de cambiar de directorio con el comando "chdir", pero sin embargo se queda pegado el directorio ejecutado la primera vez. ¿Me podrían ayudar a ver qué tengo mal en el código? Gracias.

Se lee un archivo línea por línea, primero se ejecuta un bat y luego si se ejecutó bien se debe cambiar al directorio que se cargó de la línea del archivo para compilar.

$fileCompile = $ENV{'CC_RUNSCRIPTS'} . "\\Lista_CP_Temp.txt"; ...
Read more : Cambios de directorios con chdir | Vistas : 638 | Respuestas : 2 | Foro : Básico


Ayuda con Add_Delta_DHMS

Hola, solicito vuestra ayuda nuevamente, tengo el siguiente código:

my $local=3;
print LOG "*seg ***$seg \n";

our ($yr_txt,$mes_txt,$dia_txt,$hora_txt,$min_txt, $seg_txt) = Add_Delta_DHMS($yr,$me,$dia,$hora,$min,$seg, 0,-$local, 0 ,0);
$yr_txt = sprintf "%2d",$yr_txt;
$mes_txt= sprintf "%2d",$mes_txt;
$dia_txt= sprintf "%2d",$dia_txt;
$hora_txt= sprintf "%02d",$hora_txt;
$min_txt= sprintf "%02d",$min_txt;
print LOG "**seg *1 *$seg \n";
print LOG "**txt **$seg_txt \n";
$seg_txt= sprintf "%5.2f",$seg_txt;
print LOG "****$seg_txt \n";

Mi problema es que la variable $seg_txt, me toma solo la parte entera de la información ...
Read more : Ayuda con Add_Delta_DHMS | Vistas : 613 | Respuestas : 2 | Foro : Básico


Nueva versión de la distribución Rakudo Star: 2012.11

Ya está disponible la nueva versión de la distribución Rakudo Star: v2012.11.

Recordemos que esta distribución reúne los siguientes componentes:

* la versión 2012.11 del compilador Rakudo Perl 6
* la versión 4.6.0 de la máquina virtual Parrot
* varios módulos, documentación, y otros recursos

Anuncio (en inglés)
Read more : Nueva versión de la distribución Rakudo Star: 2012.11 | Vistas : 1136 | Respuestas : 0 | Foro : Noticias de Perl


Elementos duplicados en un XML

Hola a todos. Acabo de empezar en esto del Perl y he tirado varias veces de los tutoriales y algunos mensajes en el Foro para ver cosas, pero ahora ando perdido con algo porque no entiendo el comportamiento de una estructura con la que estoy pegándome; a ver si me podéis ayudar.

Tengo un xml con una serie de servicios para unas llamadas HTTP que tengo que hacer. El script ya está hecho y funciona, ...
Read more : Elementos duplicados en un XML | Vistas : 2057 | Respuestas : 8 | Foro : Básico


Algo más que bits: Calcular distancia entre dos ciudades

«Como decía el otro día, necesito un programa que calcule distancias entre ciudades. No puedo ir a GOOGLE MAPS y hacerlo a mano porque hablamos de una tabla completa.

Hoy vamos a utilizar Perl.»

Artículo
Read more : Algo más que bits: Calcular distancia entre dos ciudades | Vistas : 727 | Respuestas : 0 | Foro : Pasando el rato


Identificar archivos con permisos peligrosos

Intento desarrollar un script en Perl, que permita identificar todos los archivos con permisos peligrosos para la seguridad del sistema, y quiénes son sus dueños.

El script debe recibir el directorio donde se van a buscar los archivos y mostrar cuáles son los archivos (ruta completa, propietario, permisos).

¿Qué archivos son los que debo buscar?

Aquellos que tengan permisos 777 (-rwxrwxrwx), 766 (-rwx-wx-wx), 666 (--wx-wx-wx).

Ejemplo de uso:

./buscarPeligrosos.pl /home
Read more : Identificar archivos con permisos peligrosos | Vistas : 1491 | Respuestas : 9 | Foro : Básico


MP3 Downloader 0.1

Hice este simple script para buscar y bajar música.

El código:

#!usr/bin/perl
#MP3 Downloader 0.1
#Coded By Doddy H

use LWP::UserAgent;
use URI::Split qw(uri_split);
use Time::HiRes "usleep";

my $nave = LWP::UserAgent->new;
$nave->agent(
"Mozilla/5.0 (Windows; U; Windows NT 5.1; nl; rv:1.8.1.12) Gecko/20080201Firefox/2.0.0.12"
);
$nave->timeout(5);

my $se = "downloads_mp3";

unless ( -d $se ) {
mkdir( $se, "777" );
}

chdir $se;

head();

print " Song : ";
chomp( my $song = <stdin> );

$song =~ ...
Read more : MP3 Downloader 0.1 | Vistas : 1778 | Respuestas : 1 | Foro : Proyectos


Expresión Diferencial RNA-seq

¡¡¡Hola a todos!!!

Tengo un problema y estoy atorado con esto desde hace ya varios días. Tengo un archivo así:

ID RPKM_C RPKM_T1 RPKM_T2
Pp1s10008_1V6.1 15.1413902 13.23147945 63.56598706
Pp1s100_101V6.1 3.02827804 2.615525008 7.196149479
Pp1s100_102V6.1 6.012701324 6.004640585 12.75103445
Pp1s100_104V6.1 4.660445525 4.4133651 8.656488079
Pp1s100_106V6.1 4.05209418 3.87275314 6.58645081
Pp1s100_107V6.1 3.563197791 3.881832493 7.756641103
Pp1s100_108V6.1 2.658938461 2.450037373 6.639192251

Y necesito un script que me compare los RPKM_C vs RPKM_T1, RPKM_C vs RPKM_T2, de cada ID y que los asigne a ...
Read more : Expresión Diferencial RNA-seq | Vistas : 2061 | Respuestas : 5 | Foro : Bioinformática


Ya no puedo acceder al panel de control en el cgi-bin

Hola.

Desde hace tiempo no puedo abrir un archivo .cgi desde la carpeta cgi-bin del servidor pero sólo en este equipo, en los demás se abre sin problemas.

La dirección es la siguiente http://www.intelresponder.com/cgi-bin/arp2/ar.cgi y la contraseña es aeiou.

Una vez que accedemos, la pantalla de la derecha se abre sin problemas, pero la izquierda se queda en blanco y el logo de carga no para de funcionar, hasta ...
Read more : Ya no puedo acceder al panel de control en el cgi-bin | Vistas : 4880 | Respuestas : 13 | Foro : Web


 

Identificarte  •  Registrarse


Estadísticas

Mensajes totales 36890 • Temas totales 7432 • Usuarios totales 1981

cron