First PERL contributions

https://api.openstreetmap.org/user/Gary68/diary/2848