(in sub old_shellwords) > - local($_) =3D join('', @_); > - my(@words,$snippet,$field); > + no warnings 'uninitialized'; # we will be testing undef strings Where would undef strings ever appear ? Except of course for the join of @_ if that has undef elements, or the $_ default case if that's undef. And in these cases I'd prefer getting the warnings. > + local *_ =3D \join('', @_) if @_; > + my (@words, $snippet);Thread Previous | Thread Next