for my work I do a lot of perl work that involves using Net::SSH and Net::SSH::Expect, so if you need some help with that, I may be able to shed some light on it