I used scalar too, but searching for alternate solutions.
~~ is not really what I was after, since it does not play well enough with undef's.
perl -we 'my $x = ~~undef'