Thanks very much for the help, robartes (++). Here's what I came up with, in case anyone should read this thread and want to know the (quick & dirty, at least) solution:
I'm still interested if there's an actual way to do it with the Expect.pm module (making this a bit more perl-relevant), so if anyone is clued, a heads-up would be fantastic.
scott.