Question : regexp de Perl avec les étiquettes et l'espace de division

J'essaye d'analyser la corde à partir d'un dossier de HTML : class= " lineNumbers " >

1 de >
 class= " entrée-corps " de 
 
                              
LOTS de TEXT
 
                           travaux " clairs " de >


This de class= de 
 
 ($text) = (=~ m de $content|class= " entrée-corps " de 
 (. +) >|s) ; 

but que je veux assortir sur la dernière étiquette de 
 pas sur le 
.  Ce qui précède devrait être in extenso.  Ainsi je pensent que je suis l'obtention a collé sur l'espace/caractère NL ici, parce qu'elle semble comme tout, de de combinaison \ s \ n.+ avec l'étiquette de 
 ne fonctionne pas. Une idée ce que je fais mal ici ? 

class= de 

Réponse : regexp de Perl avec les étiquettes et l'espace de division

Vous devez ajouter le drapeau multiligne.

1 :	($text) = (=~ m de $content| (. +) |SM) ;