http://www.perlmonks.org?node_id=1033193


in reply to Re^3: Question regarding handling exceptions in subroutine
in thread Question regarding handling exceptions in subroutine

Shouldn't it be:

my $result = qx($command);

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

[download]

Regards, Karl

«The Crux of the Biscuit is the Apostrophe»

In Section Seekers of Perl Wisdom