Use either simple parens and a single expression:

open (...) or ($errormsg = $!, $status = -1);
[download]

or expressify a block using do:

open (...) or do {
    $errormsg = $!;
    $status = -1;
}
[download]

Makeshifts last the longest.