Opened by Glasperlenspieler at 2010-01-02 20:48
User since
2003-08-04
12208 Artikel
Admin1
![[Homepage]](/battie/theme/default/homepage.gif)
2003-08-04
12208 Artikel
Admin1
wenn eine regex nicht matcht, ist der erste schritt immmer, sicherzustellen, dass in der variable auch das drin ist, was du erwartest.
siehe dazu auch
VariablenInhalt
du iterierst also über @lines_in und matchst auf /^--[\s\n]/
\s enthält übrigens schon das \n, so dass das überflüssig ist.
um genau zu sehen, was in $_ drinsteht, machst du:
und dann schauen, was der output ist.
dann kommt vermutlich heraus, dass was anderes drinsteht als du erwartest.
siehe dazu auch
VariablenInhaltdu iterierst also über @lines_in und matchst auf /^--[\s\n]/
\s enthält übrigens schon das \n, so dass das überflüssig ist.
um genau zu sehen, was in $_ drinsteht, machst du:
Code (perl): (dl
)
1 2 3 4 5 6 7 8
# lade ich in jedem meiner skripte, da ich es eh öfter brauche use Data::Dumper; # zum genauen debuggen auch von normalerweise nicht druckbaren sonderzeichen local $Data::Dumper::Useqq = 1; # in der schleife print Dumper $_;
und dann schauen, was der output ist.
dann kommt vermutlich heraus, dass was anderes drinsteht als du erwartest.
Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
lesen:Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
lesen:
Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem