Select Code to Download

open($javain, "java ... |") or die "....";
while (<$javain>) {
...
  #send some input
}
close($$javaout);