Select Code to Download

#! /bin/bash
dummp.pl  # may need full/relative path here
echo $?

my $result = $exp->send("exec wrapper.sh");
$exp->expect (5, [qr/1/, sub {<handle failure>}],
                 [qr/0/, sub {<handle success>}],
                 ...);
...