diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2000-03-19 01:22:47 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2000-03-19 01:22:47 +0000 |
| commit | 2959b6e3384ea619841b1f9556846dd2755caf04 (patch) | |
| tree | 2d04c06f1d270b5ae604b56df892ea674b740be4 /t/op/taint.t | |
| parent | 8341b96b912f641681f822ceb6ec0b8b19720375 (diff) | |
| download | perl-2959b6e3384ea619841b1f9556846dd2755caf04.tar.gz | |
Taint also the passwd field of the getpw*().
p4raw-id: //depot/cfgperl@5810
Diffstat (limited to 't/op/taint.t')
| -rwxr-xr-x | t/op/taint.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/t/op/taint.t b/t/op/taint.t index 6a5d6b7e99..883f069dbd 100755 --- a/t/op/taint.t +++ b/t/op/taint.t @@ -547,7 +547,7 @@ else { my @getpwent = getpwent(); die "getpwent: $!\n" unless (@getpwent); test 142,( not tainted $getpwent[0] - and not tainted $getpwent[1] + and tainted $getpwent[1] and not tainted $getpwent[2] and not tainted $getpwent[3] and not tainted $getpwent[4] |