I found a solution...
Instead of setting this in my web.xml:
<servlet>
<servlet-name>cgi</servlet-name>
<servlet-class>org.apache.catalina.servlets.CGIServlet</servlet-class>
<init-param>
<param-name>debug</param-name>
<param-value>6</param-value>
</init-param>
<init-param>
<param-name>cgiPathPrefix</param-name>
<param-value>WEB-INF/cgi</param-value>
</init-param>
<load-on-startup>5</load-on-startup>
</servlet>
<servlet-mapping>
<servlet-name>cgi</servlet-name>
<url-pattern>/cgi-bin/*</url-pattern>
</servlet-mapping>
I added this to my servlet:
<init-param>
<param-name>passShellEnvironment </param-name>
<param-value>true</param-value>
</init-param>
Now I have access to my environment variables in my perl script (running on
the Tomcat server)
Alex Mestiashvili wrote:
>
> Joris Kimpe wrote:
>> Hi all,
>>
>> don't know if this is the correct place, but here it goes...
>>
>> I've created a cgi script (perl) which need to run in Tomcat 5.5. But
>> when
>> I try to connect to our database, the error I get is:
>>
>> install_driver(DB2) failed: Can't load
>> 'w:/win32/install/core/CO_PERL/site/lib/auto/DBD/DB2/DB2.dll' for module
>> DBD::DB2: load_file:The specified module could not be found at
>> w:/win32/install/core/CO_PERL/lib/DynaLoader.pm line 230.
>> at (eval 3) line 3
>> Compilation failed in require at (eval 3) line 3.
>> Perhaps a required shared library or dll isn't installed where expected
>> at
>> W:\win32\install\core\CO_TOMCAT\webapps\xtremis\WEB-INF\cgi\present.pl
>> line 283
>>
>> If I check for the dll, I see that is present in this directory...
>>
>> If I copy some dll's from C:\Program Files\IBM\SQLLIB\BIN to the same
>> directory, it works fine... But I don't think this is the way to do it.
>>
>> My question now is, how can I set a custom environment variable which I
>> can
>> use in my perl script (while running in Tomcat).
>>
>> Thanks!
>>
>>
> Hi ,
> I am not sure that it will help , but
>
> for environment variables you can use %ENV hash
>
> and if you want to define some places with perl modules , you can use
> @INC array
>
> here is an example
> #!/usr/bin/perl
>
> foreach my $val (keys (%ENV) ) {
> print $ENV{$val};
> }
>
> push (@INC,'/usr/lib/my_modules');
>
> foreach my $val(@INC) {
> print "$val\n";
> }
>
> $perl env.pl
> DCOPRef(konsole-3234,session-6)/local/adm/.Xauthority\h:\w\$ local|
> /usr/bin/lesspipe
> %s/tmp/ssh-HUJSRj3179/agent.3179/stable/rooten_US.UTF-8root/usr/lib/jvm/jdk1.6.0_05/jreroot1;31/usr/bin/lesspipe
>
> %s
> %s3/usr/local/bin:/usr/bin:/usr/sbin:/bin:/sbin:/usr/bin/X11:/usr/lib/jvm/jdk1.6.0_0
> <skip>
> /usr/local/lib/perl/5.10.0
> /usr/local/share/perl/5.10.0
> /usr/lib/perl5
> /usr/share/perl5
> /usr/lib/perl/5.10
> /usr/share/perl/5.10
> /usr/local/lib/site_perl
>
> or another example (best) which i've found here
> http://www.devdaily.com/perl/edu/articles/pl010015/
>
> #!/usr/bin/perl
>
> use lib "/home/george/modules";
>
> print "[EMAIL PROTECTED] is @INC\n";
>
> $perl inc.pl
> @INC is /home/george/modules /etc/perl /usr/local/lib/perl/5.10.0
> /usr/local/share/perl/5.10.0 /usr/lib/perl5 /usr/share/perl5
> /usr/lib/perl/5.10 /usr/share/perl/5.10 /usr/local/lib/site_perl .
>
>
>
>
> ---------------------------------------------------------------------
> To start a new topic, e-mail: users@tomcat.apache.org
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
>
>
>
--
View this message in context:
http://www.nabble.com/Running-CGI-%28Perl%29-%3D%3E-Can%27t-load-module-DBI-tp18341567p18356402.html
Sent from the Tomcat - User mailing list archive at Nabble.com.
---------------------------------------------------------------------
To start a new topic, e-mail: users@tomcat.apache.org
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
