Hi there monks,

The following has been bugging me for some time now. Have not been able to find an awnser on it and made me not use tainted mode while the situation asks for it.

What is the case... Well... Im putting together some website with some Perl AJAX responders. Lazy SOB as I am I allways put functions (like checking the login status of a user) in a module. I learned how to add a module from the current directory:

#! /usr/bin/perl -wT

use strict;
$ENV{PATH} = '';
use File::Basename qw(dirname);
use Cwd qw(abs_path);
use lib qw(.);
use lib dirname(dirname abs_path $0);
use SiteFunctions qw(ValidLogin);

[download]

This works Aok without the -T but break ons the "use SiteFunctions qw(ValidLogin);" with tainted mode enabled (like above). Like so:

pkn@ilak:/home/sites/feedback/cgi-bin$ ./test.pl
Insecure dependency in require while running with -T switch at ./test.
+pl line 13.
BEGIN failed--compilation aborted at ./test.pl line 13.

[download]

I would verry much like to have the tainted mode in effect... any help on this will be appreciated greatly.

Peter

NB

What I see is a compilation error. Isn't tainted mode something which is done at run time?

In reply to Own modules and tainted mode by PeterKaagman

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.