• Publicidad

Cómo convertir espacios a "_"

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

Cómo convertir espacios a "_"

Notapor charlygarcia » 2010-09-22 19:10 @840

Hola a todos.

Supongamos que tengo una variable así:

$var1="perl es espectacular";

¿cómo sería la manera más sencilla de tener en $var2 "perl_es_espectacular"?

Gracias por la ayuda a todos.

Carlos
[text]¿Cómo lograr que no se seque una gota de agua? Arrojándola al mar. [/text] - Nota: Este tag no se puede utilizar en firmas.Samsara
Avatar de Usuario
charlygarcia
Perlero nuevo
Perlero nuevo
 
Mensajes: 54
Registrado: 2009-03-06 23:16 @011

Publicidad

Re: Cómo convertir espacios a "_"

Notapor explorer » 2010-09-23 02:40 @152

Una simple transliteración:

$var2 = $var1;
$var2 =~ tr/ /_/;


O sustitución:

$var2 = $var1;
$var2 =~ s/ /_/g;


De forma abreviada:

($var2 = $var1) =~ tr/ /_/;
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

Re: Cómo convertir espacios a "_"

Notapor charlygarcia » 2010-09-23 11:00 @500

¡¡¡Muchas gracias, explorer!!!

Es curioso que la persona más experta en Perl en la que más colabora de alguna manera, se cumple aquello de que para recibir hay que dar, (nos colaboras mucho a muchos programadores no expertos y por eso mismo cada vez te haces más y más experto).

Gracias nuevamente.
[text]¿Cómo lograr que no se seque una gota de agua? Arrojándola al mar. [/text] - Nota: Este tag no se puede utilizar en firmas.Samsara
Avatar de Usuario
charlygarcia
Perlero nuevo
Perlero nuevo
 
Mensajes: 54
Registrado: 2009-03-06 23:16 @011

Re: Cómo convertir espacios a "_"

Notapor wanako » 2010-09-23 11:47 @533

Hola, chicas.

Lo que abunda no daña, dicen:

Sintáxis: [ Descargar ] [ Ocultar ]
Using perl Syntax Highlighting
  1. use strict;
  2.  
  3. my $var1 = "   perl     es   espectacular  ";
  4. my $var2 = $var1;
  5.  
  6. ##### Inexpresiones Desreguladas #####
  7.  
  8. print "Original: [$var2]\n";
  9. $var2 =~ s/^\s+|\s+$//g;
  10. print "Sin espacio principio/fin: [$var2]\n";
  11. $var2 =~ s/\s+/_/g;
  12. print "Final: [$var2]\n";
  13.  
  14. ###### otro #####
  15.  
  16. my $var3 = join('_', split(' ', $var1));
  17. print "Con split/join: [$var3]\n";
  18.  
  19.  
Coloreado en 0.002 segundos, usando GeSHi 1.0.8.4


Lindo forete, no lo había visto, faltan avatares con pechos femeninos voluminosos, pero lindo al fin :D

Salú.
wanako
Perlero nuevo
Perlero nuevo
 
Mensajes: 27
Registrado: 2010-09-23 11:27 @519

Re: Cómo convertir espacios a "_"

Notapor explorer » 2010-09-23 12:20 @555

Bienvenido a los foros de Perl en Español, wanako.

Gracias por tu aporte.

Si no hay avatares femeninos es porque todavía no hay hombres que se los hayan puesto a sí mismos, lo cual hablaría mucho de su falta de interés por el lenguaje Perl y más en otras cosas. Pero como en este foro sí nos interesamos por Perl, somos más corteses.

No todos los avatares están permitidos: hay muy pocas mujeres programadoras en Perl (menos del 4%) y no queremos ofenderlas. Así que cuando alguien se le ocurra hacer eso, que se atenga a las consecuencias.

Más información, en el Reglamento de Perl en Español.

(Si alguien siente la necesidad de ver pechos femeninos voluminosos, puede encontrarlos en el resto de Internet, a un clic de distancia).
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


Volver a Básico

¿Quién está conectado?

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