You've misused wantarray. It tells the context in which the current subroutine was called, not in what context wantarray was called.

 > perl
sub context {
    warn
        !defined wantarray
            ? "void" :
        wantarray ? "list" : "scalar",
        $/;
}
@{context()};
<EOF>
scalar
[download]