print '<?xml version=\'1.0\' encoding=\'UTF-8\'?>
<osm version=\'0.6\' generator=\'kordinatat.sql.pl\'>';

$n=0;

while (<>)
{
    if(/(\d+.\d+)., .(\d+.\d+)., .(\d+)/)
    {
	$n--;
	print "<node id=\"$n\" lat=\"$2\" lon=\"$1\" version=\"1\" visible=\"true\" ><tag k=\"src-id\" v=\"$3\"/></node>\n";
    }
}
print '</osm>';
