Inicio > Programacion > Eliminar espacios en blanco en perl

Eliminar espacios en blanco en perl

Perl nos ofrece muchas facilidades a ala hora de trabajar con cadenas de texto, como por ejemplo hacer un split de una cadena y almacenar los valores en un array.
El problema viene cuando , por ejemplo, consideramos una coma (,) como carácter de corte y hay muchos espacios delante y detrás, los cuales no nos interesan. Entonces… ¿cómo eliminamos esos espacios en blanco?

Pues muy sencillo. Con la siguiente expresión regular:

$_ =~ s/\s//g;

Vamos a ver un ejemplo sencillo:

my $string= "hola, caracola   ,    esto es una cadena       larga "

my @array= split(/,/, $string); 

foreach(@array) 

   $_ =~ s/\s//g; #Elimina espacios en blanco
   print $_; 

   print “\n”;
}

La salida obtenida es:

hola
caracola
estoesunacadenalarga

Categorías:Programacion Etiquetas: , ,
  1. Anónimo
    27 septiembre 2013 a las 20:05

    Muchas gracias, exactamente lo que estaba buscando.

  2. abraham
    4 noviembre 2016 a las 21:03

    hola, no se si podrías ayudarme, tengo un problema similar, tengo este código que me arroja un warning y creo que esta relacionado con algo similar: open INPUTFILE, “”, “$output” or die “can`t creat file\n”;

    while ($line = ) {
    chomp $line;
    next if $line =~ /^#|^unassigned/i;
    if ($line) {
    my (@taxon_value) = split /\t/, $line;
    if ($taxon_value[0]) {
    if ($kingdom) {
    my @kingd = $taxon_value[0] =~ m/D_0__(.*?);D_1|k__(.*?);p__/g;
    foreach (@kingd) {
    next if /^$/;
    next if /^unknown/i;
    next if /^uncultured$/i;
    next if /^unidentified$/i;

    push @taxon_list, $_;
    }
    }
    }
    }
    } el coding me arroja un warning de valor no utilizado (Use of uninitialized value $_ in pattern match (m//) …..), ya he intentado muchas maneras de eliminar el mensaje , el código funciona para lo que quiero pero no me deja de aparecer el mensaje !!! …. Mil gracias y disculpas las molestias.

  1. 22 octubre 2014 a las 10:03
  2. 19 noviembre 2016 a las 22:45

Responder

Introduce tus datos o haz clic en un icono para iniciar sesión:

Logo de WordPress.com

Estás comentando usando tu cuenta de WordPress.com. Cerrar sesión / Cambiar )

Imagen de Twitter

Estás comentando usando tu cuenta de Twitter. Cerrar sesión / Cambiar )

Foto de Facebook

Estás comentando usando tu cuenta de Facebook. Cerrar sesión / Cambiar )

Google+ photo

Estás comentando usando tu cuenta de Google+. Cerrar sesión / Cambiar )

Conectando a %s

A %d blogueros les gusta esto: