Perl/Espressioni regolari (oltre): differenze tra le versioni
Contenuto cancellato Contenuto aggiunto
Riga 559:
@parole = $stringa =~ /([^\s]+)/g;
print "la frase
print join("\n" , @parole)."\n";
Riga 575:
NOTA : si è usato [^\s] al posto di \w perchè i caratteri accentati non rientrano fra i caratteri "a-zA-Z_0-9".
Vediamo questo altro esempio :
$data = "2007/03/27";
($anno , $mese, $giorno) = $data =~ m%(\d+)/(\d\d)/(\d\d)%g;
print "la data è composta da:\n";
print join("\n" , $anno , $mese , $giorno)."\n";
che produce:
la data è composta da:
2007
03
27
[[Categoria:Linguaggio Perl]]
| |||