🚀 go-pugleaf

Qrczak wrote:
> 
> On Mon, 13 Apr 1998, Krzysztof Koczyjan wrote:
> 
> Z tym że pozostaje ta sama niepewność, czy on nie dopasuje początku
> czegoś w rodzaju (x+y) akurat do .*? zamiast do \(.*?\). Nigdy nie
> słyszałem o regule, że jeśli coś pasuje do kilku części oddzielonych 

Perl uzywa tzw "leniwego" obliczania wyrazen regularnych - zatrzymuje
sie na pierwszym pasujacym wzorcu - i jak doswidczenia pokazuja sprawdza
wzorce od lewej strony. 
"Pelne" obliczanie zatrzymuje sie na najdluzszym z pasujacych, niestety
wymaga to przejrzenia wszystkich kombinacji. Wymaga to niestety wiecej
czasu, a perl ma dzialac szybko :-).

W przypadku ktory opisujesz nie akurat problemu (.*)\+ jest dluzsze niz
(.*\+ , tak ze zostanie wybrane wlasciwe, ale jesli chcesz miec pewnosc
to mozna uzyc czegos takiego:
while(1){
	if( /\G(\(.*?\))(\+|$)/gc ){
		fun($1);
	}
	elsif( /\G(.*?)(\+|$)/gc ){
		fun($1);
	}
	else{
		last;
	}
}

Pozdrowienia
	KK