[Lxr-dev] Running the LXR Tests

[Adrian I. <adr...@ho...>]

Hi All,

I've just attempted to run the LXR tests as described in lxr/tests/README and when I do so I get the following error on my Windows XP laptop using ActiveState Perl v5.8.8:

Insecure dependency in eval while running with -T switch at C:/Perl/site/lib/Test/Unit/Loader.pm line 46.

This equates to the following code:

sub compile_class {
    my $classname = shift;
    debug("  Test::Unit::Loader::compile_class($classname) called\n");
    # Check if the package exists already.
    {
        no strict 'refs';
        if (my @keys = grep { ! /::$/ } keys %{"$classname\::"}) {
            debug("    package $classname already exists (@keys); not compiling.\n");
            return;
        }
    }
    # No? Try 'require'ing it
>    eval "require $classname";
    die $@ if $@;
    debug("    $classname compiled OK as class name\n");
}

Which, if I understand the taint switch correctly, is indeed an error since in taint mode Perl inherently distrusts any data that it receives from outside the program's source. When I remove the use of the taint switch the tests all run and pass.

That's all well and good except I'm left wondering how anyone else manages to successfully run the tests with the code as it is in the CVS repository. Anyone know if this is a windows specific thing?

What I'd like to do is remove the taint switch since it's just test code and there's no security risk. Any objections?

Cheers,
Adrian

_________________________________________________________________
Beyond Hotmail — see what else you can do with Windows Live.
http://clk.atdmt.com/UKM/go/134665375/direct/01/