Salve a tutti,
ho un grande problema che qui vi espongo:
ho bisogno di salvare in un file (o cmq mostrare a video) il contenuto di ciò che si trova dopo una certa corrispondenza. Mi spiego.
Problema pratico:
Devo catalogare alcuni articoli di una legge salvata in un file formato html. Per questo motivo apro il file html e metto il suo contenuto in una stringa (@). In questo modo riesco a trovare la corrispondenza all'articolo (ad es. "art.1") ma come posso salvare ciò che viene dopo "art.1" e prima di "art.2", visto che il contenuto dell'art. 1 non è sulla stessa riga della corssipondenza?
Con questa routine non si può ottenere niente di utile:
open (FILE, "legge.html")||die "$!";
@legge=<FILE>;
close (FILE);
foreach $riga(@legge){
if ($riga =~ m/Articolo.\d/g){
print "$&";
}
}
In questo caso visualizzo la corrispondenza ma come faccio a salvare il contenuto dell'articolo che si trova sulle righe successive del file?
Grazie,
zeno78