One of the earliest uses I made of Perl was on Cisco IOS. Initially, to parse RADIUS log output, but later on, I used Expect.pm and telnet to automatically fetch router configurations, modify them, and submit them back to the router (actually, just made the IOS changes in-situ). Anyway, thought I would point out this module as it may be relevant to your task.