$ perl foobar.pl
Remaining text is '<p>Simple code to connect and login to HP Procurve use(ing) Expect below, generates following output to STDOUT and PATH/FILE</p><p>Connecting
 to Tacacs server

Username: 


</p>
'