Thread Problem mit den /
(7 answers)
Opened by jan99 at 2013-10-07 14:53 Code (perl): (dl
)
1 2 3 4 5 6 7 8 9 10 11 12 13 14 $tags[0] = lc($tags[0]); print Dumper(@tags)."\n"; if ($tags[0] eq '//'){ # sind zwei(!) // drin writeKV($fh_out,'highway','street_lamp'); exit 0; } elsif ($tags[0] eq '/none'){ # ist /none drin writeKV($fh_out,'highway','street_lamp'); writeKV($fh_out,'ref','none'); } elsif ($tags[0] =~ /\/\[\d+\]/) { # falls /[12345670] drin # Code für /mit_Ziffern } ich weiß nicht was das exit 0; soll, was dann das Programm beendet, aber das wirst du wohl so wollen. QuoteWas bedeutet: "klappt nicht" genau? Erklärs uns bitte. Last edited: 2013-10-07 15:13:06 +0200 (CEST) |