sytadin traffic info scraper written in perl