[Talk-de] BETA: Statistik Buchholz in der Nordheide

[Frederik Ramm]

Hi,

> Also mir geht es echt nur einzig und allein um das extrahieren der
> Straßennamen (ohne Bushaltestellennamen und POI-Namen) aus einem  
> gegebenen
> OSM-File.

#!/usr/bin/perl

while(<>)
{
     next unless (/^\s*<way/);
     $name = "";
     $hwy="";
     while(1)
     {
         if (/<\/way>/)
         {
             print "$name\n" if ($hwy);
             last;
         }
         $name=$1 if (/k="name" v="(.*)"/);
         $hwy=1 if (/k="highway"/);
         $_=<>;
         last unless ($_);
     }
}

> Der Code darf auch gerne richtig grausam sein oder so

Wie gewuenscht. Musst noch ein sort -u dahinterpappen oder halt die  
Namen im Perl in ein Hash schreiben, das war jetzt so ein Schnipsel  
aus meiner Muelltonne.

Bye
Frederik

-- 
Frederik Ramm  ##  eMail frederik at remote.org  ##  N49°00'09" E008°23'33"