Select Code to Download

sub exit_with_msg {
    my ($message,$returnid) = @_;
...
    print "RETURNID: $returnid\n";
    exit 0;
}