Re: %udat persistence problem...S.O.S.

2000-05-31 Thread ___cliff rayman___

you might want to try:

my $therequest=$r-the_request;
my($host,$uri) = $therequest=~m!http://([^/]+)(.*))!;
unless($host=~m!xyz\.com!){
   $r-content_type('text/html');
   $r-header_out(Location = "http://www.xyz.com$uri");
   return REDIRECT;
}

you can probably also get mod_rewrite to do this for you very easily as
well.


--
___cliff [EMAIL PROTECTED]

"Hello!" wrote:

 sirs, i met a problem on EMBPERL_COOKIE_DOMAIN, which i set it to
 "xyz.com" for example. the IP address of my www.xyz.com is
 123.99.88.77. %udat fails to be persistent if the URL entered in
 browser's Location box is http://123.99.88.77, very possibly because
 the domain part is "99.88.77" which is different from "xyz.com" i set
 for EMBPERL_COOKIE_DOMAIN so that the browser won't return the cookie
 EMBPERL_UID. i uncomment PerlSetEnv EMBPERL_COOKIE_DOMAIN but it still
 not work. or, how can i know entered URL is 123.99.88.77 (not
 SERVER_NAME) so that i can redirect the browser to www.xyz.com? is
 there any elegant remedy for such kind of user
 ignorance? thanks.huang-ming

  - Original Message -
  From: Gerald Richter
  To: Hello ; Embperl@Perl. Apache. Org
  Sent: Friday, May 12, 2000 2:04 PM
  Subject: RE: %udat persistence problem...S.O.S.


I'm sorry I didn't read the mailing list, because
   I don't know how to get the list.

  Look at
  
http://perl.apache.org/embperl/Embperl.pod.15.html#Feedback_and_Bug_ReportsGerald










Re: %udat persistence problem...S.O.S.

2000-05-31 Thread Hello



thanks a lot.

but, does the_request() 
contain the host part (ie. 123.99.88.77for my case)of entered URL? 
it seems to contain only method, uri, and protocol only.

huang-ming
- Original Message - 
From: ___cliff rayman___ [EMAIL PROTECTED]
To: Hello! [EMAIL PROTECTED]; [EMAIL PROTECTED]
Sent: Thursday, June 01, 2000 8:24 AM
Subject: Re: %udat persistence 
problem...S.O.S.
 you might want to try: 
 my $therequest=$r-the_request; my($host,$uri) = 
$therequest=~m!http://([^/]+)(.*))!; 
unless($host=~m!xyz\.com!){  
$r-content_type('text/html');  
$r-header_out(Location = "http://www.xyz.com$uri"); 
 return REDIRECT; }  you can probably also 
get mod_rewrite to do this for you very easily as well.  
 -- ___cliff [EMAIL PROTECTED] 
 "Hello!" wrote:   sirs, i met a problem on 
EMBPERL_COOKIE_DOMAIN, which i set it to  "xyz.com" for example. the 
IP address of my www.xyz.com is  
123.99.88.77. %udat fails to be persistent if the URL entered in  
browser's Location box is http://123.99.88.77, 
very possibly because  the domain part is "99.88.77" which is 
different from "xyz.com" i set  for EMBPERL_COOKIE_DOMAIN so that 
the browser won't return the cookie  EMBPERL_UID. i uncomment 
PerlSetEnv EMBPERL_COOKIE_DOMAIN but it still  not work. or, how can 
i know entered URL is 123.99.88.77 (not  SERVER_NAME) so that i can 
redirect the browser to www.xyz.com? is 
 there any elegant remedy for such kind of user  ignorance? 
thanks.huang-ming   - 
Original Message -  From: Gerald 
Richter  To: Hello ; Embperl@Perl. 
Apache. Org  Sent: Friday, May 12, 
2000 2:04 PM  Subject: RE: %udat 
persistence problem...S.O.S.   
 I'm sorry 
I didn't read the mailing list, because 
 I don't know 
how to get the list.   
Look at  http://perl.apache.org/embperl/Embperl.pod.15.html#Feedback_and_Bug_ReportsGerald 
   



Re: %udat persistence problem...S.O.S.

2000-05-31 Thread ___cliff rayman___

your right - sorry.
i hadn't tried it - i was reading Apache Modules and did not
read it correctly.
i also tried variations of Apache::URI parse to get a hostname,
but that did not seem to work on my development server.  it is
back several revs however.
cliff

Hello wrote:

 thanks a lot. but, does the_request() contain the host part (ie.
 123.99.88.77 for my case) of entered URL? it seems to contain only
 method, uri, and protocol only. huang-ming- Original Message
 -From: ___cliff rayman___ [EMAIL PROTECTED]To: Hello!
 [EMAIL PROTECTED]; [EMAIL PROTECTED]Sent: Thursday, June
 01, 2000 8:24 AMSubject: Re: %udat persistence problem...S.O.S.  you
 might want to try:
 
  my $therequest=$r-the_request;
  my($host,$uri) = $therequest=~m!http://([^/]+)(.*))!;
  unless($host=~m!xyz\.com!){
 $r-content_type('text/html');
 $r-header_out(Location = "http://www.xyz.com$uri");
 return REDIRECT;
  }
 
  you can probably also get mod_rewrite to do this for you very easily
 as
  well.
 
 
  --
  ___cliff [EMAIL PROTECTED]
 
  "Hello!" wrote:
 
   sirs, i met a problem on EMBPERL_COOKIE_DOMAIN, which i set it to
   "xyz.com" for example. the IP address of my www.xyz.com is
   123.99.88.77. %udat fails to be persistent if the URL entered in
   browser's Location box is http://123.99.88.77, very possibly
 because
   the domain part is "99.88.77" which is different from "xyz.com" i
 set
   for EMBPERL_COOKIE_DOMAIN so that the browser won't return the
 cookie
   EMBPERL_UID. i uncomment PerlSetEnv EMBPERL_COOKIE_DOMAIN but it
 still
   not work. or, how can i know entered URL is 123.99.88.77 (not
   SERVER_NAME) so that i can redirect the browser to www.xyz.com? is

   there any elegant remedy for such kind of user
   ignorance? thanks.huang-ming
  
- Original Message -
From: Gerald Richter
To: Hello ; Embperl@Perl. Apache. Org
Sent: Friday, May 12, 2000 2:04 PM
Subject: RE: %udat persistence problem...S.O.S.
  
  
  I'm sorry I didn't read the mailing list, because
 I don't know how to get the list.
  
Look at
  
 http://perl.apache.org/embperl/Embperl.pod.15.html#Feedback_and_Bug_ReportsGerald

  
  
  
 
 
 
 
 

--
___cliff [EMAIL PROTECTED]





Re: %udat persistence problem...S.O.S.

2000-05-31 Thread Hello



never mind.

i turned to 
$req_rec-hostname() and it finally returned what i wanted, 123.99.88.77. 


related API document can be 
found on the book, "Writing Apache modules with Perl and C".

thanks anyway.

huang-ming

- Original Message - 
From: ___cliff rayman___ [EMAIL PROTECTED]
To: Hello [EMAIL PROTECTED]; [EMAIL PROTECTED]
Sent: Thursday, June 01, 2000 10:47 AM
Subject: Re: %udat persistence 
problem...S.O.S.
 your right - sorry. i hadn't 
tried it - i was reading Apache Modules and did not read it 
correctly. i also tried variations of Apache::URI parse to get a 
hostname, but that did not seem to work on my development server. 
it is back several revs however. cliff  Hello 
wrote:   thanks a lot. but, does the_request() contain the 
host part (ie.  123.99.88.77 for my case) of entered URL? it seems 
to contain only  method, uri, and protocol only. huang-ming- 
Original Message  -From: ___cliff rayman___ [EMAIL PROTECTED]To: Hello!  
[EMAIL PROTECTED]; 
[EMAIL PROTECTED]Sent: 
Thursday, June  01, 2000 8:24 AMSubject: Re: %udat persistence 
problem...S.O.S.  you  might want to try:  
   my $therequest=$r-the_request;   
my($host,$uri) = $therequest=~m!http://([^/]+)(.*))!;   
unless($host=~m!xyz\.com!){   
$r-content_type('text/html');   
$r-header_out(Location = "http://www.xyz.com$uri");  
 return REDIRECT;   }  
   you can probably also get mod_rewrite to do this for you 
very easily  as   well.   
--   ___cliff [EMAIL PROTECTED] 
"Hello!" wrote: 
 sirs, i met a problem on EMBPERL_COOKIE_DOMAIN, which i set it to 
   "xyz.com" for example. the IP address of my www.xyz.com is
123.99.88.77. %udat fails to be persistent if the URL entered in  
  browser's Location box is http://123.99.88.77, very possibly  
becausethe domain part is "99.88.77" which is different 
from "xyz.com" i  setfor 
EMBPERL_COOKIE_DOMAIN so that the browser won't return the  
cookieEMBPERL_UID. i uncomment PerlSetEnv 
EMBPERL_COOKIE_DOMAIN but it  stillnot work. 
or, how can i know entered URL is 123.99.88.77 (not
SERVER_NAME) so that i can redirect the browser to www.xyz.com? is
 there any elegant remedy for such kind of user
ignorance? thanks.huang-ming  
 - Original Message -  
  From: Gerald Richter   
 To: Hello ; Embperl@Perl. Apache. Org 
   Sent: Friday, May 12, 2000 2:04 
PMSubject: RE: %udat 
persistence problem...S.O.S.  
   
 I'm sorry 
I didn't read the mailing list, because   
 I don't know 
how to get the list.  
 Look at 
http://perl.apache.org/embperl/Embperl.pod.15.html#Feedback_and_Bug_ReportsGerald 
 

-- ___cliff [EMAIL PROTECTED]