RE: [otrs] FindBin qw($Bin)

28 Aug 2006

      Here is what I did, and so far seems to be OK.
Hi,

I am running :
Apache 2.2.x
Mysql 5.0.20
Perl 5.8.8
Mod_perl 2.0.2
!!

Update :
Seems to work now, resuming tests..:-)
Her is what I changed last, maybe some redundant changes, will eliminate
later.
In httpd-vhost.conf ( virtual host part, remember I use apache 2.2.? ) 

Listen requests.xx.yy.com:80

<VirtualHost requests.xx.yy.com:80>
    ServerAdmin ahr@ti.yyy.emea.xx.com
#    DocumentRoot /usr/requests
    DocumentRoot /usr/otrs
    ServerName requests.xx.xx.com
    ErrorDocument 404 /missing.html
    ErrorDocument 403 /Denied.html
    ErrorDocument 500 /500ServerError.html

    ErrorLog "|/usr/web/bin/rotatelogs
/usr/web/logs/requests-error_log.%Y-%m-%d-%H_%M_%S 5M"
    CustomLog "|/usr/web/bin/rotatelogs
/usr/web/logs/requests-access_log 1M" common
    LogLevel warn
#
    <IfModule log_config_module>
       LogFormat "%h %l %u %t \"%r\" %>s %b \"%{Referer}i\"
\"%{User-Agent}i\"" combined
       LogFormat "%h %l %u %t \"%r\" %>s %b" common

    <IfModule logio_module>
         LogFormat "%h %l %u %t \"%r\" %>s %b \"%{Referer}i\"
\"%{User-Agent}i\" %I %O" combinedio
    </IfModule>
#       CustomLog logs/access_log common
    </IfModule>
#

  Alias /otrs-web/ "/usr/usr200/otrs/var/httpd/htdocs/"
  ScriptAlias /otrs/ "/usr/usr200/otrs/bin/cgi-bin/"

 Alias /otrs "/usr/usr200/otrs/bin/cgi-bin/"

    PerlSwitches -I/usr/usr200/otrs/
    PerlSwitches -I/usr/usr200/otrs/Kernel
    PerlSwitches -I/usr/usr200/otrs/Kernel/cpan-lib
    PerlSwitches -I/usr/usr200/otrs/Kernel/Modules

    SetHandler perl-script

    PerlResponseHandler ModPerl::Registry
    PerlOptions +ParseHeaders
    Options ExecCGI
    Order allow,deny
    Allow from all
</Location>

    SetHandler perl-script

    Options ExecCGI
    Order allow,deny
    Allow from all
</Location>

#    Options Indexes FollowSymLinks +ExecCGI
#    Options +ExecCGI -Includes
#    AllowOverride Limit
    AllowOverride None
    DirectoryIndex index.html /GoodBye.html
    Order allow,deny
    Allow from all
  </Directory>

    AllowOverride None
    Options +ExecCGI -Includes
    AddHandler cgi-script .cgi
#    DirectoryIndex index.pl
    SetEnv LD_LIBRARY_PATH "/usr/lib:/usr/local/lib:/lib"
  </Directory>

</VirtualHost>

Then
In /usr/otrs/bin/cgi-bin

Index.pl

Coment out the shbang. ( #!usr/local/bin/perl ) and

##use FindBin qw($Bin);

##use lib "$Bin/../..";
##use lib "$Bin/../../Kernel/cpan-lib";
BEGIN{
  unshift( @INC, "/usr/usr200/otrs" );
  unshift( @INC, "/usr/usr200/otrs/Kernel" );
  unshift( @INC, "/usr/usr200/otrs/Kernel/cpan-lib" ); }

use strict;

use vars qw($VERSION @INC);
$VERSION = '$Revision: 1.80 $';
$VERSION =~ s/^\$.*:\W(.*)\W.+?$/$1/;

# check @INC for mod_perl (add lib path for "require module"!) #push
(@INC, "$Bin/../..", "$Bin/../../Kernel/cpan-lib"); push (@INC,
"/usr/usr200/otrs/bin/cgi-bin/../..",
"/usr/usr200/otrs/bin/cgi-bin/../../Kernel/cpan-lib");

Same for facq.pl and customer.pl

I am resuming testing now!
Kind regards
Andre

-----Original Message-----
From: otrs-bounces@otrs.org [mailto:otrs-bounces@otrs.org] On Behalf Of
Ben Lentz
Sent: zaterdag 26 augustus 2006 15:53
To: otrs@otrs.org
Subject: [otrs] FindBin qw($Bin)

Greetings,
I apologize if this has been asked before, but my OTRS isn't working on
my system because FindBin is returning a faulty path in the $Bin
variable. I understand that FindBin is broken with mod_perl, so how is
this supposed to work?

And no, I'm not using scripts/apache2-perl-startup.pl. The documentation
reads that I "may" want to use a mod_perl startup script, but I actually
don't... causing Apache to delay it's startup to load perl modules isn't
something I'm too keen on, given this webserver is servicing other
sites.

I'm going to venture to guess that folks out there who have OTRS working
are using the apache?-perl-startup.pl, which forces these variables:

# --
# set otrs lib path!
# --
use lib "/opt/otrs/";
use lib "/opt/otrs/Kernel/cpan-lib";

Versus running without the startup and relying on FindBin in the .pl,
which is confirmed broken:
use FindBin qw($Bin);
use lib "$Bin/../..";
use lib "$Bin/../../Kernel/cpan-lib";

Does anyone see this as a bug, or is it just me? Is there another
workaround?

Thanks in advance for your insight and opinion, even if the response is
simply, "just use the startup script, jerk"

http://perl.apache.org/docs/1.0/guide/snippets.html#More_on_Relative_Pat
hs
http://siesta.unixbeard.net/siesta/archive/hates-software/2005/09/08/1e1
300b8.html

_______________________________________________
OTRS mailing list: otrs - Webpage: http://otrs.org/
Archive: http://lists.otrs.org/pipermail/otrs
To unsubscribe: http://lists.otrs.org/cgi-bin/listinfo/otrs
Support orr consulting for your OTRS system?
=> http://www.otrs.com/

RE: [otrs] FindBin qw($Bin)

Her, Andre