Front page | perl.perl5.porters |
Postings from July 2001
On Mon 09 Jul 2001 19:01, Jarkko Hietaniemi <jhi@iki.fi> wrote:
> > HP-UX 10.20 stdio/perlio -Uuseperlio
> > HP-UX 10.20 stdio/perlio -DDEBUGGING -Uuseperlio
> > HP-UX 10.20 stdio/perlio -Duseperlio
> > HP-UX 10.20 stdio/perlio -DDEBUGGING -Duseperlio
> > HP-UX 10.20 stdio/perlio -Duseperlio -Duselongdouble
> > HP-UX 10.20 stdio/perlio -DDEBUGGING -Duseperlio -Duselongdouble
> > lib/File/Find/taint................FAILED at test 29
>
> ..but on this I'd appreciate some debugging...
I'm not into tainting very much, but @11308, after inserting 'system "ls -lR
fa" just before the eval of test 29 I got this:
ok 28
# check untaint_skip (No follow)
total 0
-rw-rw-rw- 1 merijn softwr 0 Jul 12 19:37 fa_ord
drwxrwx--- 2 merijn softwr 96 Jul 12 19:37 faa
drwxrwx--- 3 merijn softwr 96 Jul 12 19:37 fab
lrwxrwxrwx 1 merijn softwr 5 Jul 12 19:37 fsl -> ../fb
fa/faa:
total 0
-rw-rw-rw- 1 merijn softwr 0 Jul 12 19:37 faa_ord
fa/fab:
total 0
-rw-rw-rw- 1 merijn softwr 0 Jul 12 19:37 fab_ord
drwxrwx--- 2 merijn softwr 96 Jul 12 19:37 faba
fa/fab/faba:
total 0
-rw-rw-rw- 1 merijn softwr 0 Jul 12 19:37 faba_ord
# $File::Find::dir => 'fa'
# $_ => '.'
# $File::Find::dir => 'fa'
# $_ => 'fsl'
# $File::Find::dir => 'fa'
# $_ => 'fa_ord'
# $File::Find::dir => 'fa'
# $_ => 'fab'
# $File::Find::dir => 'fa'
# $_ => 'faa'
not ok 29
--
H.Merijn Brand Amsterdam Perl Mongers (http://www.amsterdam.pm.org/)
using perl-5.6.1, 5.7.1 & 628 on HP-UX 10.20 & 11.00, AIX 4.2, AIX 4.3,
WinNT 4, Win2K pro & WinCE 2.11 often with Tk800.022 &/| DBD-Unify
ftp://ftp.funet.fi/pub/languages/perl/CPAN/authors/id/H/HM/HMBRAND/
Thread Previous
|
Thread Next