Front page | perl.perl5.porters |
Postings from December 2004
(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