用perl写expect脚本

perl写expect脚本， Expect and using Expect with PERL. EXPECT: A TCL based Toolkit for Automating Interactive Tasks. Leveraging the task specific capabilities of Expect with the power and flexibility of PERL.