Test what wantarray return when called as second parameter to or

test.pl

#! /usr/bin/env perl

use strict;
use warnings;

my $some_cond = 0;

sub method {
    my $wa = wantarray();
    die "wantarray = $wa" if defined $wa;
}

$some_cond or method();