Perl script useful to configure Cisco routers via TFTP