"Jimmy" <nyhedsgruppe2@get2net.danmark> writes:
> Jeg forsøger at skrive et regexp, som kan erstatte alle linieskift med <br>.
> Linieskift kan være (\n|\r|\r\n)
>
> Udfordringen er at den ikke må erstatte linieskift der kommer efter et
> HTML-tag.
> Jeg mener man kan identificere disse ved hjælp af nedenstående:
>
> [^>](\n|\r|\r\n)
>
> Men hvordan kombineres de to udsagn, så jeg fjerner alle linieskift, som
> ikke har en > foran?
>
> Jeg fandt kun en OR operator (pipe), men ikke nogen AND operator og hverken
> & eller && kunne jeg få til at fungere.
Nu skriver du ikke om du har hele strengen i en variabel eller tager
en linie ad gangen.
Hvis du har en linie ad gangen er det nemmeste:
s/>$/>/ || s/$/<br>/
Ellers må man jo lave så man tager en linie ad gangen:
$old = "hej med dig\n<a>\n<table>\r\n<a>\rhest";
foreach (split /\r\n|\n|\r/, $old) {
s/>$/>\n/ || s/$/<br>\n/;
$new .= $_;
}
print $new;
--
Lars Balker Rasmussen Consult::Perl