The eAuction Support Forums - Error in line 5226 in eauction.pl

05/10/25 at 21:57:59

Not just another Perl script

Welcome, Guest. Please Login or Register

The forums are protected by
AccessControl
(written by Dieter Werner)
Click here if you want to check your IP against the most important RBLs of the net.
Click here in order to visite the AccessControl forums.

<< Visit the international e Auction Marketplace >>
Buy and sell PC and Consumer Electronic components

Home

Help

The eAuction Support Forums › eAuction 1.6.1.x › Start Up and more › Error in line 5226 in eauction.pl

(Moderator: Dieter Werner)

‹ Previous topic | Next topic ›

Pages: 1 2 3 4 5 6

Send Topic | Print

Error in line 5226 in eauction.pl (Read 1433 times)

Dieter Werner

Administrator

Offline

Dipl. Paranoiac ®

Posts: 1162
Germany
Gender: male

Re: Error in line 5226 in eauction.pl
Reply #6 - 07/27/05 at 17:19:32

That means:
your server doesn't deliver the data of $ENV{'HTTP_HOST'}
and that's very bad - you should change the provider.

Solution:
- search the script for $ENV{'HTTP_HOST'}
- replace each instance of $ENV{'HTTP_HOST'} with www.YourDomain

Or:
- search the script for Code:

#-#############################################
# Setup Environment
#-#############################################
BEGIN {
   print "Content-type: text/html\n\n";
   $0 =~ m~(.*)/[^/]+~ || $0 =~ m~(.*)\\[^\\]+~;   
   unshift @INC, $1;
   srand(time ^ ($$ + ($$ << 15)));
}

and replace it with this Code:

#-#############################################
# Setup Environment
#-#############################################
BEGIN {
   print "Content-type: text/html\n\n";
   $0 =~ m~(.*)/[^/]+~ || $0 =~ m~(.*)\\[^\\]+~;   
   unshift @INC, $1;
   $ENV{'HTTP_HOST'} = "www.YourDomain";
   srand(time ^ ($$ + ($$ << 15)));
}

Multimedia file viewing and clickable links are available for registered members only!! You need to Login or Register!!

Greetings from Germany
Dieter Werner

Advertising

View Profile | WWW

IP Logged

t2c eAuction User Offline I love Perl Posts: 17	Re: Error in line 5226 in eauction.pl Reply #7 - 07/27/05 at 17:26:51 Thanks I don´t want to change provider becurse it´s my self that is the provider. I will try to do what you told me insted or do you have a solution for my server insted? Johnni
Back to top	Advertising View Profile IP Logged

Dieter Werner

Administrator

Offline

Dipl. Paranoiac ®

Posts: 1162
Germany
Gender: male

Re: Error in line 5226 in eauction.pl
Reply #8 - 07/27/05 at 17:33:52

t2c wrote on 07/27/05 at 17:26:51:

Thanks
I don´t want to change provider becurse it´s my self that is the provider.

I will try to do what you told me insted or do you have a solution for my server insted?

Johnni

You should read the docu of your server-software Wink

Upload this Code:

#!/usr/bin/perl
use CGI qw/:standard/;
	 
print header,
 start_html,
 h2("Parameter:"), CGI::as_string(),
 h2("Environment:"),
 (map { p("$_ => $ENV{$_}") } sort keys %ENV),
 end_html;

as dump.pl to your cgi-bin directory, chmod it 775 and start it via your browser.

The script will display all ENV content your server delivers.

Multimedia file viewing and clickable links are available for registered members only!! You need to Login or Register!!

Greetings from Germany
Dieter Werner

Advertising

View Profile | WWW

IP Logged

Pages: 1 2 3 4 5 6

Send Topic | Print

‹ Previous topic | Next topic ›

« Home

‹ Board

If you like eAuction, please Rate it.
If you don't like eAuction, please Rate it too.

1 is being poor and 10 is being excellent

Messages posted in these forums contain only the views and opinions of the posters;
they do not necessarily represent the views or opinions of EveryScript.
EveryScript provides this area as a venue for discussion of
software products and services.
EveryScript makes no claim as to the accuracy of information contained on these pages.
EveryScript dissociates herself expressly from all contributions and links of this forums.