Signos de puntuación PERL
Publicado por Arturo (2 intervenciones) el 06/02/2019 03:32:59
Estoy trtando de sustituir signos de puntuacion en PERL, pero no sé como hacerlo
Encontre eso, pero no hay mucha infotmación, o al menos no la he encontrado
1
2
3
4
5
6
7
8
chop ($linea);
$linea = lc ($linea);
$linea =~ s/( )//g;
$linea =~ s/(;)//g;
$linea =~ s/(?)//g;
$linea =~ s/(¿)//g;
$linea =~ s/(¡)//g;
$linea =~ s/(!)//g;
Encontre eso, pero no hay mucha infotmación, o al menos no la he encontrado
Valora esta pregunta


0