Re^4: Question regarding handling exceptions in subroutine

[karlgoethebier]

Shouldn't it be:

my $result = qx($command);

if ( $? >> 8 != 0 ) {
    if ($@) {
        die $@;
    }
    else {
        die qq(Something really weird happened!);
    }
}

Regards, Karl