[freeside-users] Having problems after install

Thu Sep 8 23:12:11 PDT 2005

I ended up scrapping the last install and did a fresh install using fedora
4. Everything compiled fine but when I try to load apache it crashes and
leaves the following in the error log:

Operator or semicolon missing before %RT_ENABLED at
/usr/local/etc/freeside/handler.pl line 41.
Ambiguous use of % resolved as operator % at
/usr/local/etc/freeside/handler.pl line 41.
Operator or semicolon missing before %RT_ENABLED at
/usr/local/etc/freeside/handler.pl line 170.
Ambiguous use of % resolved as operator % at
/usr/local/etc/freeside/handler.pl line 170.
[Fri Sep 09 01:10:14 2005] [error] Bareword "RT_ENABLED" not allowed while
"strict subs" in use at /usr/local/etc/freeside/
handler.pl line 170.\nBareword "RT_ENABLED" not allowed while "strict subs"
in use at /usr/local/etc/freeside/handler.pl
line 41.\nCompilation failed in require at (eval 2) line 1.\n
[Fri Sep 09 01:10:14 2005] [error] Can't load Perl file:
/usr/local/etc/freeside/handler.pl for server 127.0.0.1:0,
exiting...

handler.pl at reference points have the following:

Line 41:

if ( %%%RT_ENABLED%%% ) {
 eval '
   use lib ( "/opt/rt3/local/lib", "/opt/rt3/lib" );
   use RT;
   use vars qw($Nobody $SystemUser);
   RT::LoadConfig();
 ';
 die $@ if $@;

Line 170:

if ( %%%RT_ENABLED%%% ) {
        eval '
          use RT::Tickets;
          use RT::Transactions;
          use RT::Users;
          use RT::CurrentUser;
          use RT::Templates;
          use RT::Queues;
          use RT::ScripActions;
          use RT::ScripConditions;
          use RT::Scrips;
          use RT::Groups;
          use RT::GroupMembers;
          use RT::CustomFields;
          use RT::CustomFieldValues; use RT::CustomFieldValues;
          use RT::TicketCustomFieldValues;

          use RT::Interface::Web;
          use MIME::Entity;
          use Text::Wrapper;
          use CGI::Cookie;
          use Time::ParseDate;
          use HTML::Scrubber;
          use Text::Quoted;
        ';
        die $@ if $@;
      }

As I said all compiled and installed without errors.

Thanks,
John

> -----Original Message-----
> From: freeside-users-bounces at sisd.com [mailto:freeside-users-
> bounces at sisd.com] On Behalf Of Shivkumar
> Sent: Sunday, September 04, 2005 2:51 AM
> To: Freeside users mailing list
> Subject: Re: [freeside-users] Having problems after install
> 
> Hi,
> you need to check these things:
> a) do you have apache compiled with mod_perl? I would recommend mod_perl
> 1.29
> b) is your httpd.conf configured to execute cgi perl scripts
> 
> It doesnt hurt to post the error logs of httpd.
> 
> Regards,
> Shivkumar
> 
> 
> 
> sales at michianawireless.com said the following:
> 
> > First as requested here is the required information about my setup:
> >
> > Freeside version: 1.5.7
> >
> > Using HTML::Mason (version 1.3101)
> >
> > OS Fedora 3
> >
> > Perl V 5.8.5
> >
> > Apache-DBI-0.94
> >
> > MLDBM-2.01
> >
> > postgresql-7.4.8
> >
> > Basically on the rest. All the perl modules were downloaded using CPAN
> > as of yesterday so should be of the latest. Now that that is out of
> > the way, here is the problem.
> >
> > Went via the instructions and installed freeside exactly to the T on
> > the web site setup. Went fine, then headed to the next step the admin
> > setup. I logged into the site http://thesite/freeside/ and get the
> > auth prompt and enter the info and then it gets to the menu and from
> > here is the problem.
> >
> > % my $conf = new FS::Conf;
> >
> > freeside
> >
> >
> >
> > <% $conf->config('company_name') %>Billing
> >
> >
> >
> > Logged in as
> >
> > <% getotaker %>
> >
> > Freeside <http://www.sisd.com/freeside> v
> > <% $FS::VERSION %>Documentation <http://12.96.250.154/freeside/docs/>%
> > if ( $conf->config('ticket_system') eq 'RT_Internal' ) { % eval "use
> > RT;";
> >
> >
> >
> >
> >
> > RT <http://www.bestpractical.com/rt> v
> > <% $RT::VERSION %>Documentation <http://wiki.bestpractical.com/>% }
> >
> >
> > [ Sales / Customer service ] % if ( $conf->config('ticket_system') ) {
> > [ Support / Ticketing
> > <http://12.96.250.154/freeside/#ticketing#ticketing> ] % } [
> > Bookkeeping / Collections
> > <http://12.96.250.154/freeside/#bookkeeping#bookkeeping> ] [ Reports
> > <http://12.96.250.154/freeside/#reports#reports> ] [ Sysadmin
> > <http://12.96.250.154/freeside/#sysadmin#sysadmin> ]
> >
> > And when you click a link it gives you code instead of the page, see
> > below:
> >
> > Clicking add new customer - Results:
> >
> > % % % #for misplaced logic below % #use FS::part_pkg; % % #for false
> > laziness below (now more properly lazy) % #use FS::svc_acct_pop; % %
> > #for (other) false laziness below % #use FS::agent; % #use
> > FS::type_pkgs; % %my $conf = new FS::Conf; % %#get record % %my $error
> > = ''; %my($custnum, $username, $password, $popnum, $cust_main,
> > $saved_pkgpart); %my(@invoicing_list); %if ( $cgi->param('error') ) {
> > % $error = $cgi->param('error'); % $cust_main = new FS::cust_main ( {
> > % map { $_, scalar($cgi->param($_)) } fields('cust_main') % } ); %
> > $custnum = $cust_main->custnum; % $saved_pkgpart =
> > $cgi->param('pkgpart_svcpart') || ''; % if ( $saved_pkgpart =~
> > /^(\d+)_/ ) { % $saved_pkgpart = $1; % } else { % $saved_pkgpart = '';
> > % } % $username = $cgi->param('username'); % $password =
> > $cgi->param('_password'); % $popnum = $cgi->param('popnum'); %
> > @invoicing_list = split( /\s*,\s*/, $cgi->param('invoicing_list') );
> > %} elsif ( $cgi->keywords ) { #editing % my( $query ) =
> > $cgi->keywords; % $query =~ /^(\d+)$/; % $custnum=$1; % $cust_main =
> > qsearchs('cust_main', { 'custnum' => $custnum } ); % if (
> > $cust_main->dbdef_table->column('paycvv') % &&
> > length($cust_main->paycvv) ) { % my $paycvv = $cust_main->paycvv; %
> > $paycvv =~ s/./*/g; % $cust_main->paycvv($paycvv); % } %
> > $saved_pkgpart = 0; % $username = ''; % $password = ''; % $popnum = 0;
> > % @invoicing_list = $cust_main->invoicing_list; %} else { %
> > $custnum=''; % $cust_main = new FS::cust_main ( {} ); %
> > $cust_main->otaker( &getotaker ); % $cust_main->referral_custnum(
> > $cgi->param('referral_custnum') ); % $saved_pkgpart = 0; % $username =
> > ''; % $password = ''; % $popnum = 0; % @invoicing_list = (); %}
> > %$cgi->delete_all(); %my $action = $custnum ? 'Edit' : 'Add'; % % <%
> > header("Customer $action", '', ' onUnload="myclose()"') %>% if (
> > $error ) { Error: <% $error %>% }
> >
> > Trimmed the rest.
> >
> > Please let me know what went wrong?
> >
> > Thanks,
> >
> > John
> >
> > P.S. Sorry if I missed any pertinent info requested.
> >
> >------------------------------------------------------------------------
> >
> >_______________________________________________
> >freeside-users mailing list
> >freeside-users at sisd.com
> >http://420.am/cgi-bin/mailman/listinfo/freeside-users
> >
> >
> _______________________________________________
> freeside-users mailing list
> freeside-users at sisd.com
> http://420.am/cgi-bin/mailman/listinfo/freeside-users