Select Code to Download

while($session){
$session->exp->interact(\*STDIN,"\cA");
...
    }
print "\njohn\nsmith";
}

networks>
          john
...
john
smith
networks>