$ perl -wE 'sub f { my ($v) = @_; say $v }; f()'
Use of uninitialized value $v in say at -e line 1.

$