I believe Net::Telnet::Cisco is not "warnings" safe.
Replace the -w switch in the #! line with an use warnings, which does not leak into the Net::Telnet::Cisco code.
You shouldn't have to issue the enable commands in the way you're doing it. You should call the ->enable($password) method as per the Net::Telnet::Cisco docs.