Select Code to Download

use File::Slurp;

...
$out .= "end2\n";
write_file("out2.txt", $out);

use Expect;

...
    }
  ]
);