Perl has its own implementation of Expect, which you may find useful. It should be pretty easy to translate your existing Expect scripts to Perl subroutines using the Expect module.
I have already tried using Expect.pm, but I dont want to modify the existing code into perl format. I should be able to run the existing Expect code as it is.
Like the one something like TCL-0.91 in CPAN