in reply to perl expect

Expect is not the best tool for doing that. Better use Net::OpenSSH or Net::SSH2.

In Section Seekers of Perl Wisdom