Text zwischen def. Tags in Blöcke mit def. Länge aufteilen. - #117386 (Allgemeines zu Perl)

leo11

2008-12-21 21:52

User since
2008-08-14
250 Artikel
BenutzerIn
[default_avatar]

Eine Lösung hab ich nun:

Code (perl): (dl )

@match = $data =~ m|(<Text>[^<]*</Text>)|sg;
foreach my $m (@match) {
    my $prepared_string = prepare_string($m);
    $data =~ s/$m/$prepared_string/s;
}

Eine Erklärung wieso das oben nicht ging wär trotzdem nett.

Außerdem würde mich intressieren ob die Lösung auch bei 10 MB Dateien vertretbar ist.

(Nachträglich editiert)