PERL...

https://www.openstreetmap.org/user/Gary68/diary/2739