• Publicidad

Reemplazar caracter  y ?

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

Reemplazar caracter  y ?

Notapor coltx » 2012-05-16 13:23 @599

¿Alguien me podría ayudar a saber cómo puedo reemplazar esa "Â" y ese "?" que aparece al final de estas cadenas?
Sintáxis: [ Descargar ] [ Ocultar ]
Using perl Syntax Highlighting
$Nombre = "PARA?";
$Nombre = "PARAÂ";
Coloreado en 0.002 segundos, usando GeSHi 1.0.8.4


He tratado con lo siguiente, pero nada
Sintáxis: [ Descargar ] [ Ocultar ]
Using perl Syntax Highlighting
$Nombre =~ tr/áéíóúüñçÁÉÍÓÚÜÑÇ?/aeiouuncAEIOUUNC/;
$Nombre =~ s:\†:†:g;
$Nombre =~ s:\&:&:g;
$Nombre =~ s:,,¢:™:g;
$Nombre =~ s:\®:®:g;
$Nombre =~ s:\§:§:g;
$Nombre =~ s:\‡:‡:g;
$Nombre =~ s:\’:':g;
Coloreado en 0.001 segundos, usando GeSHi 1.0.8.4
coltx
Perlero nuevo
Perlero nuevo
 
Mensajes: 79
Registrado: 2011-09-16 08:01 @376

Publicidad

Re: Reemplazar caracter  y ?

Notapor explorer » 2012-05-16 14:56 @664

Yo usaría el inverso:

$Nombre =~ s/[^A-Z]//g;

pero viendo las siguientes sentencias, queda claro que tu problema se llama "texto de entrada en utf8 que no ha sido decodificado correctamente".

Eso lo soluciones con un simple

use utf8::all;

al principio del programa.
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 18 invitados