develooper Front page | perl.perl5.porters | Postings from December 2004

Re: [perl #33173] shellwords.pl and tainting

Thread Previous | Thread Next
From:
perl5-porters
Date:
December 28, 2004 12:11
Subject:
Re: [perl #33173] shellwords.pl and tainting
Message ID:
cqsei8$hvo$1@post.home.lunix
(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


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About