Why doesn't this work:

{
        package RD;
        use strict;

                        our $dbh=\$HTML::Mason::Commands::dbh;
                        our $session=\%HTML::Mason::Commands::session;

                sub somesub {
foreach my $key (sort keys %{$session}) {print qq{$key is $session->{$key}<br/>\n};}
                                        }
1;
}

from httpd.conf:

<snip/>
        ## HTML::Mason

        PerlModule Apache::DBI
        PerlModule WHA
        PerlModule WHA::TableInfo
        PerlModule Apache2::Request
        PerlSetVar MasonArgsMethod mod_perl
        PerlSetVar MasonDataDir /var/spool/mason/test.restoredirect.com
        PerlModule HTML::Mason::ApacheHandler
        PerlSetVar MasonCodeCacheMaxSize 0
        PerlModule Apache2::Cookie
        PerlModule Apache::Session
        PerlModule Apache::Session::MySQL
        PerlSetVar MasonAllowGlobals %session
        PerlAddVar MasonAllowGlobals $dbh
        PerlAddVar MasonAllowGlobals %c
        PerlAddVar MasonAllowGlobals $userType
        PerlModule Apache2::Const
        PerlModule RD;

<snip/>

I can't see anything in %session in a different module, but in my regular Mason components I can. Why not?

What's the proper way to do what I want?

Thanks!


-------------------------------------------------------
This SF.net email is sponsored by: Splunk Inc. Do you grep through log files
for problems?  Stop!  Download the new AJAX search engine that makes
searching your log files as easy as surfing the  web.  DOWNLOAD SPLUNK!
http://sel.as-us.falkag.net/sel?cmd=lnk&kid=103432&bid=230486&dat=121642
_______________________________________________
Mason-users mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/mason-users

Reply via email to