Brethren, I have read the mod_perl documentation as best I can, and I am still having some problems. I have the following module that is supposed to simply export a few variables to the web application:

package ISLog::Config;
use warnings;
use strict;

BEGIN {
    use Exporter();
    use vars qw( @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS );
    @ISA         = qw( Exporter );
    @EXPORT      = qw();
    @EXPORT_OK   = qw( $dbh $cgi $tt $cgv );

    %EXPORT_TAGS = (
      objects => [ qw( $dbh $cgi $tt ) ],
    );
}

use Apache::Reload;

use CGI();
use DBI;
use Template;

use vars qw( $dbh $cgi $tt $cgv );

$tt = new Template(
  INCLUDE_PATH => '/var/www/template/islog'
);
$dbh = DBI->connect(
  'dbi:mysql:host=xxx;database=xxx',
  'xxx',
  'xxx'
) or die DBI->errstr();
$cgi = new CGI();
$cgv = $cgi->Vars();

1;

[download]
So that now in my other programs I can simply:

use ISLog::Config qw/ :objects $cgv /;

[download]
And Ta-daaaaa! I've got shared variables. Right? However, I've hit a snag. The database handler and CGI objects copy over fine 98% of the time, but the $cgv (which holds the $cgi->Vars() hashref) copies over empty on form submission scripts over 80% of the time. Every now and then it works, but mostly it doesn't. I've tried httpd -X and quite a few other things, but it just doesn't seem to work.

I recently tried adding the following two lines to the Config module:

print $cgi->header();
print "$_" for keys %$cgv;

[download]
at the bottom of the Config module to debug, and then almost magically, the $cgv hash was then populated in the calling script @_@. I'm going nuts here. Is there a bug in CGI under mod_perl? Am I just doing it stupid? Should I just give up this crazy import stuff? Any documentation, ideas, or LARTs would be appreciated. BTW this is latest && greatest mod_perl/apache.

--
perl -e "print qq/just another perl hacker who doesn't grok japh\n/"
simeon2000|http://holdren.net/

In reply to mod_perl & Exporter by simeon2000

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.