Re: Trouble compiling mod_perl 1.24 with Apache 1.3.12
[EMAIL PROTECTED] (William R. Ward) writes: [EMAIL PROTECTED] writes: please use the [EMAIL PROTECTED] list for support questions. Then please put that e-mail address somewhere obvious on the perl.apache.org website. Yours was the only one I could find. (It was listed as [EMAIL PROTECTED] too, which bounced). http://perl.apache.org/guide/ also has good install docs. I was only able to find a link to this once I knew what to look for. I was looking in the FAQ and found your e-mail address. Which FAQ was that? The only addresses in the mod_perl faq are [EMAIL PROTECTED], [EMAIL PROTECTED] and my own. -- Frank Cringle, [EMAIL PROTECTED] voice: (+49 2304) 467101; fax: 943357
RE: custom server string
-Original Message- From: Dave Moore [mailto:[EMAIL PROTECTED]] Sent: Tuesday, August 08, 2000 5:55 PM To: [EMAIL PROTECTED] Subject: custom server string i need to change the outgoing Server header on all requests to our site. dont ask why I would want to do that. i have my orders. i read some old posts from the 90's which said I would have to write my own send_http_header() method. sounds fun but id rather not. Is this still the case and if so...why? has anyone else had to do this? you could always change the apache source... anyone know how the ASF feels about doing this? --Geoff dave -- Dave Moore Web Application Developer mailto:[EMAIL PROTECTED] ePALS Classroom Exchange http://www.epals.com/ Connecting more than 1.9 million students and teachers in 182 countries!
Re: custom server string
"DM" == Dave Moore [EMAIL PROTECTED] writes: DM i need to change the outgoing Server header on all requests to our site. DM dont ask why I would want to do that. i have my orders. i read some old DM posts from the 90's which said I would have to write my own DM send_http_header() method. sounds fun but id rather not. Is this still the DM case and if so...why? has anyone else had to do this? Just yesterday Randal posted a handler here that adds a X_mod_perl_rules header to every page out of his site. Perhaps you could modify that? -- =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-= Vivek Khera, Ph.D.Khera Communications, Inc. Internet: [EMAIL PROTECTED] Rockville, MD +1-301-545-6996 GPG MIME spoken herehttp://www.khera.org/~vivek/
[BUG FIX] Apache.xs write_client
There are differences in the variable after a non-global substitution vs.
a global substitution. After a non-global substitution, a reference to
the scalar value is of type SVt_PVIV, as opposed to SVt_PV for global
substituion.
So I changed write_client() Apache.xs to also check if the reference is of
type SVt_PVIV, and it now works.
Doug, could you apply this patch to Apache.xs? Thanks.
Also, thanks to Ken Williams for the useful pointers.
PATCH:
--- Apache.xs.old Wed Aug 9 10:23:31 2000
+++ Apache.xs Wed Aug 9 10:23:13 2000
@@ -1076,7 +1076,7 @@
for(i = 1; i = items - 1; i++) {
int sent = 0;
-SV *sv = SvROK(ST(i)) (SvTYPE(SvRV(ST(i))) == SVt_PV) ?
+SV *sv = SvROK(ST(i)) (SvTYPE(SvRV(ST(i))) == SVt_PV ||
+SvTYPE(SvRV(ST(i))) == SVt_PVIV) ?
(SV*)SvRV(ST(i)) : ST(i);
buffer = SvPV(sv, len);
#ifdef APACHE_SSL
TEST CODE:
#!/usr/bin/perl
use Devel::Peek;
$text1 = "hello";
$text2 = "hello";
$text3 = "hello";
$text2 =~ s/hello/hi/;
$text3 =~ s/hello/hi/g;
print "reference to variable without any substitution\n";
Dump \$text1;
print "\nreference to variable after non-global substitution\n";
Dump \$text2;
print "\nreference to variable after global substitution\n";
Dump \$text3;
TEST OUTPUT:
reference to variable without any substitution
SV = RV(0x8100370) at 0x80ea8f8
REFCNT = 1
FLAGS = (TEMP,ROK)
RV = 0x80f8ca8
SV = PV(0x80eabc4) at 0x80f8ca8
REFCNT = 2
FLAGS = (POK,pPOK)
PV = 0x80f7868 "hello"\0
CUR = 5
LEN = 6
reference to variable after non-global substitution
SV = RV(0x8100370) at 0x80ea8f8
REFCNT = 1
FLAGS = (TEMP,ROK)
RV = 0x80f8c54
SV = PVIV(0x80eb010) at 0x80f8c54
REFCNT = 2
FLAGS = (POK,OOK,pPOK)
IV = 3 (OFFSET)
PV = 0x80efa1b ( "hel" . ) "hi"\0
CUR = 2
LEN = 3
reference to variable after global substitution
SV = RV(0x8100370) at 0x80ea8f8
REFCNT = 1
FLAGS = (TEMP,ROK)
RV = 0x80fd160
SV = PV(0x80eabac) at 0x80fd160
REFCNT = 2
FLAGS = (POK,pPOK)
PV = 0x80f75a0 "hi"\0
CUR = 2
LEN = 6
Ken Williams wrote:
T.J., if you grok XS you might have a look at this part of
write_client() in Apache.xs:
for(i = 1; i = items - 1; i++) {
int sent = 0;
SV *sv = SvROK(ST(i)) (SvTYPE(SvRV(ST(i))) == SVt_PV) ?
(SV*)SvRV(ST(i)) : ST(i);
buffer = SvPV(sv, len);
Try looking at your $text with Devel::Peek to see whether there are any
differences in what it contains in the two cases.
RE: custom server string
-Original Message- From: Vivek Khera [mailto:[EMAIL PROTECTED]] Sent: Wednesday, August 09, 2000 10:43 AM To: [EMAIL PROTECTED] Subject: Re: custom server string "DM" == Dave Moore [EMAIL PROTECTED] writes: DM i need to change the outgoing Server header on all requests to our site. DM dont ask why I would want to do that. i have my orders. i read some old DM posts from the 90's which said I would have to write my own DM send_http_header() method. sounds fun but id rather not. Is this still the DM case and if so...why? has anyone else had to do this? Just yesterday Randal posted a handler here that adds a X_mod_perl_rules header to every page out of his site. Perhaps you could modify that? the Server outbound header gets overwritten by internal magic - changing it via api calls appears fruitless... --Geoff -- =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-= Vivek Khera, Ph.D.Khera Communications, Inc. Internet: [EMAIL PROTECTED] Rockville, MD +1-301-545-6996 GPG MIME spoken herehttp://www.khera.org/~vivek/
make errors
Hi, i am trying to install mod_perl-1.24 on a redhat linux 6.2 box with kernel 2.2.16-3 and apache 1.3.12. Somebody had previosly installed modperl into the httpd binary on this box but it was not fully working, i am assuming that the previous installation is causing the make errors. I cant find the orginal mod_perl source in this box so i downloaded the lastest and tried installing this, i also took any refernces of perl support out of http.conf and overwrote the httpd binary with a backup that didnt have the perl module support buit in, i would like to know what i can do to solve this please. I get the following errors when i run make: (cd /usr/local/src/APACHE/apache_1.3.12 make) make[1]: Entering directory `/usr/local/src/APACHE/apache_1.3.12' === src make[2]: Entering directory `/usr/local/src/APACHE/apache_1.3.12' make[3]: Entering directory `/usr/local/src/APACHE/apache_1.3.12/src' === src/regex make[4]: *** No rule to make target `regcomp.c', needed by `regcomp.o'. Stop. make[3]: *** [subdirs] Error 1 make[3]: Leaving directory `/usr/local/src/APACHE/apache_1.3.12/src' make[2]: *** [build-std] Error 2 make[2]: Leaving directory `/usr/local/src/APACHE/apache_1.3.12' make[1]: *** [build] Error 2 make[1]: Leaving directory `/usr/local/src/APACHE/apache_1.3.12' make: *** [apaci_httpd] Error 2 Thanks in advance, Regards.
Re: make errors
Hi there, On Wed, 9 Aug 2000, Pamela O'Shea wrote: errors when i run make: I'd delete the entire Apache and mod_perl source trees and start from scratch with new tarballs. Otherwise you could try `make clean' in both directories followed by the instructions in the Guide. http://perl.apache.org/guide Good luck! 73, Ged.
PerlCleanupHandler
Hi, We're seeing a number of requests where the write from apache to the client browser times out and the SIGALRM signal fires. Our Apache::Registry scripts in that case don't clean up correctly, leaving session lock files around, which of course causes that particular session to be screwed up for a while. My question is would a Cleanup handler still be called in this case? ( I'm asking because it's a large site, and I can't just add code left and right... :-) Thanks! Michael -- Michael Peppler -||- Data Migrations Inc. [EMAIL PROTECTED]-||- http://www.mbay.net/~mpeppler Int. Sybase User Group -||- http://www.isug.com Sybase on Linux mailing list: [EMAIL PROTECTED]
AIX 4.3.2, perl 5.6, mod_perl 1.24, apache 1.3.12 installation problems
I have been going nuts with mod perl now. It just doesnt seem to built into apache at all Okay here is my platform AIX 4.3.2 with gcc 2.95.2 perl 5.6, apache 1.3.12, mod perl 1.24 Here are the config for mod perl perl Makefile.PL DO_HTTPD=1 APACHE_SRC=../apache_1.3.12/src \ USE_APACI=1 PREP_HTTPD=1 EVERYTHING=1 make; make install. make test fails to start web server but make install works fine. Now here are the error message that I get when I make apache ./configure --prefix=/usr/local/apache \ --activate-module=src/modules/perl/libperl.a \ --enable-shared=perl Config is fine then when I make it gives me these errors a these steps of make. rm -f libperl.so ld -bhalt:4 -bM:SRE -bI:/usr/local/lib/perl5/5.6.0/aix-multi/CORE/perl.exp -bE:. exp -b noentry -lc -L/usr/local/lib -bI:/httpd.exp -o libperl.so mod_perl.lo per lxsi.lo perl_config.lo perl_util.lo perlio.lo mod_perl_opmask.lo Apache.lo Const ants.lo ModuleConfig.lo Log.lo URI.lo Util.lo Connection.lo Server.lo File.lo Ta ble.lo -bE:/usr/local/lib/perl5/5.6.0/aix-multi/CORE/perl.exp -L/usr/local/lib /usr/local/lib/perl5/5.6.0/aix-multi/auto/DynaLoader/DynaLoader.a /usr/local/lib /perl5/5.6.0/aix-multi/auto/B/B.a /usr/local/lib/perl5/5.6.0/aix-multi/auto/Byte Loader/ByteLoader.a /usr/local/lib/perl5/5.6.0/aix-multi/auto/Data/Dumper/Dumper .a /usr/local/lib/perl5/5.6.0/aix-multi/auto/Devel/DProf/DProf.a /usr/local/lib/ perl5/5.6.0/aix-multi/auto/Devel/Peek/Peek.a /usr/local/lib/perl5/5.6.0/aix-mult i/auto/Fcntl/Fcntl.a /usr/local/lib/perl5/5.6.0/aix-multi/auto/File/Glob/Glob.a /usr/local/lib/perl5/5.6.0/aix-multi/auto/IO/IO.a /usr/local/lib/perl5/5.6.0/aix -multi/auto/IPC/SysV/SysV.a /usr/local/lib/perl5/5.6.0/aix-multi/auto/NDBM_File/ NDBM_File.a /usr/local/lib/perl5/5.6.0/aix-multi/auto/ODBM_File/ODBM_File.a /usr /local/lib/perl5/5.6.0/aix-multi/auto/Opcode/Opcode.a /usr/local/lib/perl5/5.6.0 /aix-multi/auto/POSIX/POSIX.a /usr/local/lib/perl5/5.6.0/aix-multi/auto/SDBM_Fil e/SDBM_File.a /usr/local/lib/perl5/5.6.0/aix-multi/auto/Socket/Socket.a /usr/loc al/lib/perl5/5.6.0/aix-multi/auto/Sys/Hostname/Hostname.a /usr/local/lib/perl5/5 .6.0/aix-multi/auto/Sys/Syslog/Syslog.a /usr/local/lib/perl5/5.6.0/aix-multi/aut o/attrs/attrs.a /usr/local/lib/perl5/5.6.0/aix-multi/auto/re/re.a -L/usr/local/l ib/perl5/5.6.0/aix-multi/CORE -lperl -lbind -lnsl -ldbm -ldl -lld -lm -lc -lcrypt -lbsd -lPW -liconv -ldbm -ldbm -lm ld: 0706-003 Cannot find or read import file: /httpd.exp ld:accessx(): A file or directory in the path name does not exist. ld: 0706-004 Cannot find or read export file: .exp ld:accessx(): A file or directory in the path name does not exist. make[4]: *** [libperl.so] Error 255 make[3]: *** [all] Error 1 make[2]: *** [subdirs] Error 1 make[2]: Leaving directory `/usr/local/src/apache_1.3.12/src' make[1]: *** [build-std] Error 2 make[1]: Leaving directory `/usr/local/src/apache_1.3.12' make: *** [build] Error 2 I have the httpd.exp file in the apache_1.3.12/src/support/httpd.exp But I just dont understand why ld could not find it. I would really really appreciate if anyone could help me out cuz I have been trying to get this to compile and install for 4 days now but nothing seems to work.:( Thanx, Taswar Get Your Private, Free E-mail from MSN Hotmail at http://www.hotmail.com
Authentication/Authorization
All,
I work at a large university where some faculty/staff need a way to
only allow students to view certain web pages. Here at the university we
have a central authentication system (based on kerberos) that has been
extended to the browser. Basically the you login via SSL to a machine that
hands you a cookie. Then you go to a secured page where my perl module
verifies that cookie against one of the authentication servers. If you are
authenticated then the modules sets the connection to your user name
($r-connection-user('USERNAME')) and you get to view the page otherwise
you are redirected to the login server (which later redirects you back) to
get a valid cookie.
The authentication works beautifully but authorization seems to
fails. If I have a "require user joe" in an .htaccess file and you are not
joe then apache reverts to basic authentication which makes the browser
bring up the popup box to authenticate. What I would like to do is not have
that popup box come up but instead have some message that tells the user
that they are not authorized for the current url. The only solution that I
could think of was to write a PerlAuthzHandler that mimics apache's built
in authorization but there has got to be a better way. Thanks.
--
Eli Ben Shoshan ([EMAIL PROTECTED])
North East Regional Data Center (NERDC)
Re: Trouble compiling mod_perl 1.24 with Apache 1.3.12
Frank D. Cringle writes: [EMAIL PROTECTED] (William R. Ward) writes: [EMAIL PROTECTED] writes: please use the [EMAIL PROTECTED] list for support questions. Then please put that e-mail address somewhere obvious on the perl.apache.org website. Yours was the only one I could find. (It was listed as [EMAIL PROTECTED] too, which bounced). http://perl.apache.org/guide/ also has good install docs. I was only able to find a link to this once I knew what to look for. I was looking in the FAQ and found your e-mail address. Which FAQ was that? The only addresses in the mod_perl faq are [EMAIL PROTECTED], [EMAIL PROTECTED] and my own. Sorry, I remembered wrong. It wasn't the FAQ, actually, it was the download page. http://apache.perl.org/dist/ --Bill. -- William R Ward Bay View Consulting Services http://www.bayview.com/~wrw/ [EMAIL PROTECTED] PMB 339, 1803 Mission Stphone +1 831/423-3295 PGP Key 0x2BD331E5Santa Cruz, CA 95060 USA fax +1 831/423-6499 Public key at http://www.bayview.com/~wrw/pubkey.txt pager +1 831/458-8862
Re: Proxy setup w/ SSL
siberian wrote: . In the F5 world KeepAlives destroy rules based load sorry - but what's an F5 box? -- ___cliff [EMAIL PROTECTED]http://www.genwax.com/
RE: Proxy setup w/ SSL
F5 makes load balancers -Original Message- From: ___cliff rayman___ [mailto:[EMAIL PROTECTED]] Sent: Wednesday, August 09, 2000 1:18 PM To: modperl Subject: Re: Proxy setup w/ SSL siberian wrote: . In the F5 world KeepAlives destroy rules based load sorry - but what's an F5 box? -- ___cliff [EMAIL PROTECTED]http://www.genwax.com/
Re: AIX 4.3.2, perl 5.6, mod_perl 1.24, apache 1.3.12 installation problems
On Wed, Aug 09, 2000 at 04:48:33PM +, Hey Boy wrote: I have been going nuts with mod perl now. It just doesnt seem to built into apache at all Okay here is my platform AIX 4.3.2 with gcc 2.95.2 perl 5.6, apache 1.3.12, mod perl 1.24 perl 5.6 does need some patches that I did post here a while ago. Here are the config for mod perl perl Makefile.PL DO_HTTPD=1 APACHE_SRC=../apache_1.3.12/src \ USE_APACI=1 PREP_HTTPD=1 EVERYTHING=1 make; make install. There is currently a Makefile problem, try this instead (requires that you build and install Apache with module support): perl Makefile.PL USE_APXS=1 EVERYTHING=1 \ WITH_APXS=/usr/local/apache/bin/apxs -- Jens-Uwe Mager HELIOS Software GmbH Steinriede 3 30827 Garbsen Germany Phone: +49 5131 709320 FAX:+49 5131 709325 Internet: [EMAIL PROTECTED]
Re: Flushing handler getting Open Sourced...
Yeah, that sounds about right... It's not at either extreme-- it doesn't keep EVERYTHING, and it doesn't kill the Apache child to clear the memory. I'm sure the exact directives can be thought out later. So who do I get in touch with in order for this stuff to get looked at for inclusion into mod_perl? Andrew Chen Intern, Architecture [EMAIL PROTECTED] 206-219-8445 The Cobalt Group, Inc. On Tue, 8 Aug 2000, Ken Williams wrote: [EMAIL PROTECTED] (Andrew Chen) wrote: Hello all, I was involved in a discussion a few weeks ago regarding how Cobalt Group (www.cobaltgroup.com) could get a performance boost by running our very very dirty modules under PerlRun with PerlRunOnce Off and then to have a handler that cleaned up between requests. Anyway, with a lot of help from the mod_perl community (thanks guys!) the handler was written, and it is currently going through QA to push this out to all of our websites (many thousands). Holy ambition! Additionally, we are going to release this back into the community for those that, like us, are unlucky enough to have dirty code that would be too expensive to rewrite. The question is now: How should we do it? 1) Should it be integrated into the mod_perl package? 2) Should it be a seperate package in CPAN? 3) etc., etc. It's quite possible that some of your functionality should get integrated into PerlRun itself. It sounds like an intermediate setting between PerlRunOnce Off and PerlRunOnce On. What about a setting like PerlSetVar PerlRunMode Once(equivalent to PerlRunOnce On) PerlSetVar PerlRunMode Cleanup (adds your cleanup stuff) PerlSetVar PerlRunMode Trust (equivalent to PerlRunOnce Off) The 'Trust' name is pretty stupid, couldn't think of anything better right now. Anyway, would something like this make sense? Or perhaps a "PerlRunCleanup" directive?
Re: Flushing handler getting Open Sourced...
This is the place. =) Submit a proposal for how you think PerlRun should change, and get people to discuss it so you can settle on something that seems good. Then submit a patch, preferably against the CVS version. [EMAIL PROTECTED] (Andrew Chen) wrote: Yeah, that sounds about right... It's not at either extreme-- it doesn't keep EVERYTHING, and it doesn't kill the Apache child to clear the memory. I'm sure the exact directives can be thought out later. So who do I get in touch with in order for this stuff to get looked at for inclusion into mod_perl? Andrew Chen Intern, Architecture [EMAIL PROTECTED] 206-219-8445 The Cobalt Group, Inc. On Tue, 8 Aug 2000, Ken Williams wrote: [EMAIL PROTECTED] (Andrew Chen) wrote: Hello all, I was involved in a discussion a few weeks ago regarding how Cobalt Group (www.cobaltgroup.com) could get a performance boost by running our very very dirty modules under PerlRun with PerlRunOnce Off and then to have a handler that cleaned up between requests. Anyway, with a lot of help from the mod_perl community (thanks guys!) the handler was written, and it is currently going through QA to push this out to all of our websites (many thousands). Holy ambition! Additionally, we are going to release this back into the community for those that, like us, are unlucky enough to have dirty code that would be too expensive to rewrite. The question is now: How should we do it? 1) Should it be integrated into the mod_perl package? 2) Should it be a seperate package in CPAN? 3) etc., etc. It's quite possible that some of your functionality should get integrated into PerlRun itself. It sounds like an intermediate setting between PerlRunOnce Off and PerlRunOnce On. What about a setting like PerlSetVar PerlRunMode Once(equivalent to PerlRunOnce On) PerlSetVar PerlRunMode Cleanup (adds your cleanup stuff) PerlSetVar PerlRunMode Trust (equivalent to PerlRunOnce Off) The 'Trust' name is pretty stupid, couldn't think of anything better right now. Anyway, would something like this make sense? Or perhaps a "PerlRunCleanup" directive?
Apache 1.3.12/mod_perl 1.24/Perl 5.6.0 crash
I have Apache 1.3.12 using mod_perl 1.24 as a DSO, built with Perl 5.6.0 using Apache::AutoIndex 0.08 which is running on Linux 2.2.14. Everything works fine, until, I `apachectl stop`, then add the following to the httpd.conf: PerlModule Apache::AutoIndex When I do `bin/httpd -X` Linux does a core dump. Since I compiled in DEBUG the 'gdb bin/httpd core` reports a segmentation fault with: Program received signal SIGSEGV, Segmentation fault. 0x8054b09 in ap_remove_module () (gdb) bt Program received signal SIGSEGV, Segmentation fault. 0x8054b09 in ap_remove_module () (gdb) bt #0 0x8054b09 in ap_remove_module () #1 0x8054bdf in ap_remove_loaded_module () #2 0x804f2cc in unload_module () #3 0x805126e in run_cleanups () #4 0x804f910 in ap_clear_pool () #5 0x8060683 in standalone_main () #6 0x8060f23 in main () #7 0x2ab304a5 in __libc_start_main () from /lib/libc.so.6 #8 0x815b in ?? () Cannot access memory at address 0xe853. == I don't understand why Apache/mod_perl has to remove a module when it should be installing it. Maybe its just a confusing naming convention or something? Note: that I believe I was careful to clean out old versions before the makes. I did have to 'not use' "large file support" for the Perl 5.6.0 build in order to get mod_perl to launch. Please help! ... and thankyou for any input. (You all do great work!)
Re: [ANNOUNCE] Apache::Dispatch-0.03
Roger Espel Llima wrote:
@{"${class}::ISA"}
Incidentally, does anyone know of a way to do this that works under
strict? The above requires a "no strict 'refs'" to work.
Something like this we3nt by on p5p a while ago (IIRCC):
@{$main::{"$class\::"}-{ISA}}
but that's a lot more cryptic that
{
no strict 'refs' ;
@{"${class}::ISA"} ;
}
- Barrie
cvs commit: modperl/src/modules/perl Apache.xs
ask 00/08/09 18:45:39
Modified:.Changes
src/modules/perl Apache.xs
Log:
bug with Apache::print not dereferencing scalar referencess that are
of type SVt_PVIV.
Submitted by: T.J. Mather [EMAIL PROTECTED]
Revision ChangesPath
1.504 +3 -0 modperl/Changes
Index: Changes
===
RCS file: /home/cvs/modperl/Changes,v
retrieving revision 1.503
retrieving revision 1.504
diff -u -r1.503 -r1.504
--- Changes 2000/08/02 15:53:11 1.503
+++ Changes 2000/08/10 01:45:38 1.504
@@ -10,6 +10,9 @@
=item 1.24_01-dev
+fixed bug with Apache::print not dereferencing scalar referencess that
+are of type SVt_PVIV. [ T.J. Mather [EMAIL PROTECTED] / Ask ]
+
quotemeta path_info in Registry regexp
[Tobias Hoellrich [EMAIL PROTECTED]]
1.100 +2 -1 modperl/src/modules/perl/Apache.xs
Index: Apache.xs
===
RCS file: /home/cvs/modperl/src/modules/perl/Apache.xs,v
retrieving revision 1.99
retrieving revision 1.100
diff -u -r1.99 -r1.100
--- Apache.xs 2000/07/25 17:59:48 1.99
+++ Apache.xs 2000/08/10 01:45:39 1.100
@@ -1080,7 +1080,8 @@
for(i = 1; i = items - 1; i++) {
int sent = 0;
-SV *sv = SvROK(ST(i)) (SvTYPE(SvRV(ST(i))) == SVt_PV) ?
+SV *sv = SvROK(ST(i)) (SvTYPE(SvRV(ST(i))) == SVt_PV
+|| SvTYPE(SvRV(ST(i))) == SVt_PVIV) ?
(SV*)SvRV(ST(i)) : ST(i);
buffer = SvPV(sv, len);
#ifdef APACHE_SSL
