• Publicidad

Promedio por columnas

¿Apenas comienzas con Perl? En este foro podrás encontrar y hacer preguntas básicas de Perl con respuestas aptas a tu nivel.

Re: Promedio por columnas

Notapor enric73 » 2013-06-15 05:54 @287

Una pequeña consulta.

¿Con qué función puedo seleccionar unos caracteres comunes a un conjunto de elementos de un argumento...? Me explico:

Se ejecuta el script onadesAlt.pl con 8 argumentos
Sintáxis: [ Descargar ] [ Ocultar ]
Using bash Syntax Highlighting
  1. ./onadesAtl.pl Açores_N_d0m.txt Açores_S_d0m.txt Viscater_d0m.txt Cantabri_d0m.txt StVicenç_d0m.txt Go_Cadis_d0m.txt Canarias_d0m.txt Canari_S_d0m.txt
Coloreado en 0.003 segundos, usando GeSHi 1.0.8.4

Dentro de onadesAlt.pl, se elimina la extensión .txt de todos ellos:
Sintáxis: [ Descargar ] [ Ocultar ]
Using perl Syntax Highlighting
  1. my @cap = map { substr $_, 0, -4 } @ARGV;
Coloreado en 0.002 segundos, usando GeSHi 1.0.8.4

y me quedará
Sintáxis: [ Descargar ] [ Ocultar ]
Using bash Syntax Highlighting
  1. Açores_N_d0m Açores_S_d0m Viscater_d0m Cantabri_d0m StVicenç_d0m Go_Cadis_d0m Canarias_d0m Canari_S_d0m
Coloreado en 0.001 segundos, usando GeSHi 1.0.8.4


¿Cómo puedo guardar ahora como variable d0m los últimos 3 caracteres de estos elementos? Pero no como un array, si no como una variable, ¿con qué función?

Gracias
Saludos
enric73
Perlero nuevo
Perlero nuevo
 
Mensajes: 154
Registrado: 2012-03-16 06:27 @311

Publicidad

Re: Promedio por columnas

Notapor explorer » 2013-06-15 06:05 @295

Sintáxis: [ Descargar ] [ Ocultar ]
Using perl Syntax Highlighting
  1. my $tres_ultimos = substr $cap[0], -3;
Coloreado en 0.001 segundos, usando GeSHi 1.0.8.4
JF^D Perl programming & Raku programming. Grupo en Telegram: https://t.me/Perl_ES
Avatar de Usuario
explorer
Administrador
Administrador
 
Mensajes: 14480
Registrado: 2005-07-24 18:12 @800
Ubicación: Valladolid, España

Anterior

Volver a Básico

¿Quién está conectado?

Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 27 invitados