Select Code to Download

do {
        (my($k) = 2);
...
        print("caught by otherwise \n");
        dPrt('warn', "OTHERWISE:$ex")
    }->otherwise)));

if (($pbOnDStarMachine == 1)) {
        (my($sComm) = "sudo dchown nhmgenda '$$this{'sFullPath'}'");
...
        }->otherwise)));
        return('');
    }