perl escape chars!

[Giorgos Keramidas]

On 2005-08-19 15:32, Giannis Beredimas <mperedim at ceid.upatras.gr> wrote:
> Antonis Faragitakis wrote:
>
> >iparxei autos o kodikas (word macro)
> >
> >With Selection.Find
> >       .Text = "<NTMMemoryDb>^p<Description>^pArchive^p</Description>^p"
> >       .Replacement.Text = ""
> >  End With
> >
> >o opios opou brei:
> >
> ><NTMMemoryDb>
> ><Description>
> >Archive
> ></Description>
> >
> >to kanei replace me tipota, to sbini diladi.
> >
> >se perl egrapsa to
> >s/<NTMMemoryDb>\n<Description>\nArchive\n</Description>\n//; alla
> >tipota, to idio isxi kai gia to \r\n kai \r
>
> Mallon \r\n einai kai ftaiei ena "/" pou den einai escaped :-P

Σωστά.  Μάλλον θες τουλάχιστον 2 regexp substitutions:

	$string =~ s/\015\012/\012/g;		# Die CR-LF.  Please die!
	$string =~ s...