%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.