Hi Susan,<br><br>auf Anhieb sehe ich nicht, wo das Problem liegen könnte.<br><br>Hast Du mal versucht, den Regex auf die Hälfte 'runterzubrechen und zu sehen, op er dann paßt? So eine Art binäre Suche über die Komplexität des Regex quasi?<br>
<br>Viele Grüße<br>Philip<br><br><div class="gmail_quote">2009/6/3 Susan Dittmar <span dir="ltr"><<a href="mailto:Susan.Dittmar@gmx.de">Susan.Dittmar@gmx.de</a>></span><br><blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">
Hallo Ihr,<br>
<br>
ich komme nicht weiter. Irgendwie verstehe ich nicht, warum Perl der<br>
Meinung ist, dieser Text passe nicht zum vorgegebenen Muster.<br>
<br>
-------------------------<br>
#!/usr/bin/perl -w<br>
<br>
use strict;<br>
use Regexp::Common;<br>
<br>
my $Text = << 'EOT';<br>
{<br>
\begin{center}<br>
irgendein Gelaber...<br>
\end{center}<br>
}<br>
und noch so ein bischen Müll...<br>
EOT<br>
<br>
my $Curly = '{((?:[^{}]|$RE{balanced}{-parens=>"{}"})*)}';<br>
<br>
unless ($Text =~ m/^(\s*)$Curly(.*)$/s) {<br>
print STDERR "Text passt nicht aufs Muster!\n";<br>
exit(1);<br>
}<br>
print "Alles in Butter!\n";<br>
exit(0);<br>
-------------------------<br>
<br>
Kann mir einer von Euch weiterhelfen?<br>
<br>
Danke im Voraus,<br>
<font color="#888888"><br>
Susan<br>
<br>
</font><br>--<br>
Liste: <a href="mailto:cologne-pm@pm.org">cologne-pm@pm.org</a><br>
Archiv: <a href="http://pm.org/pipermail/cologne-pm" target="_blank">http://pm.org/pipermail/cologne-pm</a><br>
Unsubscribe: <a href="http://pm.org/mailman/listinfo/cologne-pm" target="_blank">http://pm.org/mailman/listinfo/cologne-pm</a><br></blockquote></div><br>