(cmd.exe has different shell quoting!)
%perl -w -Mstrict -e "my ($v) = '';"
(no warnings)

##</code><code>##

%perl -w -Mstrict -e "my ($v) = 'a'; print $v;"
a

##</code><code>##

%perl -w -Mstrict -e "my ($v,$s) = 'a'; print $v, $s;"
aUse of uninitialized value in print at -e line 1.

##</code><code>##

%perl -w -Mstrict -e "my ($v,$s) = ('a'); print $v, $s;"
aUse of uninitialized value in print at -e line 1.

##</code><code>##

%perl -w -Mstrict -e "my ($v,$s) = ('a', 'b'); print $v, $s;"
ab

##</code><code>##

%perl -w -Mstrict -e "my ($v,$s) = 'a', 'b'; print $v, $s;"
Useless use of a constant in void context at -e line 1.
aUse of uninitialized value in print at -e line 1.