in reply to Re^4: Net::Telnet::Cisco and Terminal Server
in thread Net::Telnet::Cisco and Terminal Server

Had the same issue with time out waiting for confirm. Found this to work for me. 

        $session->cmd("clear line $port\n");
        #$session->prompt("/\[confirm\]/");
        $session->print("\n");
        $session->print("\n");
        $session->prompt("/OK/");

[download]

In Section Seekers of Perl Wisdom