Select Code to Download

# MAIN
unless ($result = my_sub() ) {
...
    # For example ...
    die "Bad data passed in.\n";
}

# MAIN
if (defined ($error = my_sub()) ) {
...
    # For example ...
    die "Bad data passed in.\n";
}