Select Code to Download

#!/usr/bin/perl

...
    elsif (condition { return "failed: uid not unique"; }
    else { return "failed: unknown error";
}

#!/usr/bin/perl

...
    }
    return;
}