$obj->someCall() or die "Error message: $! ($^E)";