perl escape chars!

[Giannis Beredimas]

Giannis Beredimas wrote:

> if ($string =~ 
> /<NTMMemoryDb>(.+)<Description>.+Archive.+<\/Description>/) {


Η για την ακρίβεια τώρα που το ξαναδιαβάζω και θυμάμαι ότι το "." δεν 
κάνει by default match τα newlines και το + 1 or more occurences (αντί 
για 0 or more)...

    if ($string =~ 
/<NTMMemoryDb>(.*)<Description>.*Archive.*<\/Description>/s)

Έτσι πιο όμορφα :-)

Υ.Γ. Άκου word :-P

G.