taint error using MLDBM::Sync 
Author Message
 taint error using MLDBM::Sync

i am getting a taint error using MLDBM::Sync 0.25 while assigning $$
and the results of `ps` to a seemingly unrelated variable. i haven't
found anything in the documentation or on usenet archives that gives
me any clue what is going on.

the following script works fine:

   --
   #!/opt/local/bin/perl5.005 -wT

   use strict;

   $ENV{PATH}='/usr/bin';

   use lib '/services/http/users/r/ryantate/cgi-bin/lib';
   use MLDBM::Sync qw(DB_File Storable);
   use MLDBM qw(DB_File Storable);
   use Fcntl;

   my %Sites_dbm;
   my $Sites_dbm =  tie %Sites_dbm, 'MLDBM::Sync',
   'sites_2',O_RDWR|O_CREAT, 0640 or die $!;

   ##join performed _after_ hash tie -- works fine
   my $s = join('.'=>($$, unpack("%32L*", `ps -al`)));

   $Sites_dbm->Lock;
   $Sites_dbm->UnLock;
   --

but the following script produces an error (printed below):

   --
   #!/opt/local/bin/perl5.005 -wT

   use strict;

   $ENV{PATH}='/usr/bin';

   use lib '/services/http/users/r/ryantate/cgi-bin/lib';
   use MLDBM::Sync qw(DB_File Storable);
   use MLDBM qw(DB_File Storable);
   use Fcntl;

   ##join performed _before_ hash tie -- taint error
   my $s = join('.'=>($$, unpack("%32L*", `ps -al`)));

   my %Sites_dbm;

   my $Sites_dbm =  tie %Sites_dbm, 'MLDBM::Sync',
   'sites_2',O_RDWR|O_CREAT, 0640 or die $!;

   $Sites_dbm->Lock;
   $Sites_dbm->UnLock;
   --

here is the error produced by the second script:

   --
   conquest.OCF.Berkeley.EDU [62] ./test_mldbmsync3
   MLDBM error: Please make sure MLDBM/Serializer/Storable.
   pm is a properly installed package.
        Perl says: "Insecure dependency in require while ru
   nning with -T switch at /services/http/users/r/ryantate/
   cgi-bin/lib/MLDBM.pm line 107.
   " at /services/http/users/r/ryantate/cgi-bin/lib/MLDBM/
   Sync.pm line 209
   can't tie to MLDBM with args: sites_2,258,416; error:
   at /services/http/users/r/ryantate/cgi-bin/lib/
   MLDBM/Sync.pm line 209.
  --
(some line breaks and spaces inserted above to indent)

does anyone know what might be going on? i apprectiate any help.

cheers, Ryan

______________________________
Ryan Tate

http://www.*-*-*.com/



Thu, 01 Jul 2004 14:08:33 GMT  
 
 [ 1 post ] 

 Relevant Pages 

1. MLDBM.pm read error

2. MLDBM install errors with FreezeThaw

3. Using another dbm with MLDBM.pm

4. Problem using MLDBM

5. Using MLDBM

6. Tie hash of hash using MLDBM

7. persistence problems using DB_File and MLDBM

8. untie warning when using MLDBM module

9. PERL bug using sort with MLDBM?

10. Problem using MLDBM

11. DB_File and seq function (using MLDBM)

12. misleading taint error message with DBI?

 

 
Powered by phpBB® Forum Software