view release on metacpan or search on metacpan
Makefile.PL view on Meta::CPAN
Apache::Module modp
CODE:
$trans(modp->$handler);
OUTPUT:
RETVAL
EOF
}
}
view release on metacpan or search on metacpan
lib/Apache/PageKit.pm view on Meta::CPAN
## the recommended fop converter has no usefull error messages.
## the errormoessages go also to STDOUT
## and the returncode is always 0
unless ($error_message =~ /^\[ERROR\]:/m){
local $/;
open PDF_OUTPUT, "<$pdf_file" or die "can't open file: $pdf_file ($!)";
binmode PDF_OUTPUT;
$$output_ref = <PDF_OUTPUT>;
close PDF_OUTPUT;
}
else {
die "Error processing template with Apache XML FOP: $error_message";
}
}
view release on metacpan or search on metacpan
ParseLog.pm view on Meta::CPAN
C<method();>
%method = $logobject->method();
Returns a hash containing HTTP method (GET, POST, PUT, etc.)
as keys, and the hit count for each key as values.
=cut
sub method {
view release on metacpan or search on metacpan
c->fp = NULL;
c->req = r;
RETVAL = ap_proxy_http_handler(r, c, uri, NULL, 0);
safefree(c);
OUTPUT:
RETVAL
char*
proxy_hash(self, r, uri)
SV *self
CODE:
ap_proxy_hash(uri, filename, pconf->cache.dirlevels, pconf->cache.dirlength);
RETVAL = filename;
OUTPUT:
RETVAL
view release on metacpan or search on metacpan
my ($name, $vars) = @_;
my $file = Template::Provider->new(ABSOLUTE => '1');
my $hash = Queue::Template::Default->new();
$template = Template->new( {
OUTPUT => $r,
LOAD_TEMPLATES => [ $file, $hash ],
PREFIX_MAP => {
file => '0',
hash => '1',
default => '1',
view release on metacpan or search on metacpan
if a form field appears in both the query string B<and> the request body. In
other words, don't try to do this:
<FORM METHOD=post ENCTYPE="multipart/form-data"
ACTION=".../my_script?foo=1">
<INPUT NAME="foo" ...>
...
You should also avoid mixing file uploads and regular input within a single
field name. In other words, don't try this either:
<INPUT TYPE=text NAME="foo">
<INPUT TYPE=file NAME="foo">
=item *
Since all query parameter keys are stored in encoded form within an
I<Apache::Table> (which is case-insensitive), it is possible for two distinct
view release on metacpan or search on metacpan
RequestNotes.pm view on Meta::CPAN
#---------------------------------------------------------------------
# put the form and cookie data in a pnote for access by other handlers
#---------------------------------------------------------------------
$r->pnotes(INPUT => $input);
$r->pnotes(UPLOADS => \@uploads) if @uploads;
$r->pnotes(COOKIES => \%cookies) if %cookies;
#---------------------------------------------------------------------
# wrap up...
RequestNotes.pm view on Meta::CPAN
PerlInitHandler Apache::RequestNotes
some Perl*Handler or Registry script:
my $input = $r->pnotes('INPUT'); # Apache::Table reference
my $uploads = $r->pnotes('UPLOADS'); # Apache::Upload array ref
my $cookies = $r->pnotes('COOKIES'); # hash reference
# GET and POST data
my $foo = $input->get('foo');
view release on metacpan or search on metacpan
lib/Apache/Roaming.pm view on Meta::CPAN
=over 8
=item *
GET, HEAD, PUT, DELETE and MOVE are handled by the module. In particular
the Non-standard MOVE method is implemented, although Apache doesn't know
it by default. Thus you need no set the li.prefs.http.useSimplePut
attribute to true.
=item *
lib/Apache/Roaming.pm view on Meta::CPAN
(Class Method) The I<handler> method is called by the Apache server
for any request. It receives an Apache request B<$r>. The methods
main task is creating an instance of Apache::Roaming by calling the
I<new> method and then passing control to the I<Authenticate>,
I<CheckDir> and I<GET>, I<PUT>, I<DELETE> or I<MOVE>, respectively,
methods.
=cut
sub handler ($$) {
lib/Apache/Roaming.pm view on Meta::CPAN
}
eval {
$self->Authenticate();
$self->CheckDir();
if ($self->{'method'} !~ /(?:GET|PUT|DELETE|MOVE)/) {
$self->{'status'} = Apache::Constants::HTTP_METHOD_NOT_ALLOWED();
die "Unknown method: $self->{'method'}";
}
my $method = $self->{'method'};
lib/Apache/Roaming.pm view on Meta::CPAN
$status = Apache::Roaming->handler_type($r)
(Class Method) This method is required only, because the Apache server
would refuse other methods than GET otherwise. It checks whether the
requested method is GET, PUT, HEAD, DELETE or MOVE, in which case it
returns the value OK. Otherwise the value DECLINED is returned.
=cut
sub handler_type ($$) {
my($class, $r) = @_;
if ($r->method() =~ /(?:GET|PUT|DELETE|MOVE)/) {
$r->handler('perl-script');
return Apache::Constants::OK();
}
return Apache::Constants::DECLINED();
}
lib/Apache/Roaming.pm view on Meta::CPAN
using a PerlSetVar instruction, see L<INSTALLATION> above for an
example.
=item file
This is the path of the file being created (PUT), read (GET), deleted
(DELETE) or moved (MOVE). It's an absolute path.
=item method
The requested method, one of HEAD, GET, PUT, MOVE or DELETE.
=item request
This is the Apache request object.
lib/Apache/Roaming.pm view on Meta::CPAN
}
=pod
=head2 GET, PUT, MOVE, DELETE
$ar_req->GET();
$ar_req->PUT();
$ar_req->MOVE();
$ar_req->DELETE();
(Instance Methods) These methods are called finally for performing the
real action. With the exception of GET, they call I<Success> finally
lib/Apache/Roaming.pm view on Meta::CPAN
}
return Apache::OK();
}
sub PUT {
my $self = shift;
my $file = $self->{'file'};
my $r = $self->{'request'};
$self->MkDir($file);
lib/Apache/Roaming.pm view on Meta::CPAN
=head2 MkDir
$ar_req->MkDir($file);
(Instance Method) Helper function of I<PUT>, creates the directory
where $file is located, if it doesn't yet exist. Works recursively,
if more than one directory must be created.
=cut
view release on metacpan or search on metacpan
lib/Apache/SWIT/Maker/FileWriter.pm view on Meta::CPAN
my $f = $self->root_dir . "/$p";
die "Cowardly refusing to overwrite $f"
if (-f $f && !$opts->{overwrite});
$vars = $self->_normalize_options($opts->{vars}, $vars)
if $opts->{vars};
my $t = Template->new({ OUTPUT_PATH => $self->root_dir,
%{ $opts->{tmpl_options} || {} } })
or die "No template";
$t->process(\$opts->{contents}, $vars, $p)
or die "No result for $n: " . $t->error;
view release on metacpan or search on metacpan
Scoreboard.xs view on Meta::CPAN
Move(sb->servers[i], dptr, msize, char);
dptr += msize;
}
Move(&sb->global, dptr, sizeof(global_score), char);
OUTPUT:
RETVAL
Apache::Scoreboard
thaw(CLASS, pool, packet)
SV *CLASS
Scoreboard.xs view on Meta::CPAN
/* debug_dump_sb(image); */
RETVAL = image;
OUTPUT:
RETVAL
SV *
image(CLASS, pool_sv)
Scoreboard.xs view on Meta::CPAN
/* make sure the pool sticks around as long as this object is alive */
mpxs_add_pool_magic(RETVAL, pool_sv);
CLASS = CLASS; /* avoid warnings */
OUTPUT:
RETVAL
int
server_limit(image)
Scoreboard.xs view on Meta::CPAN
}
else {
XSRETURN_UNDEF;
}
OUTPUT:
RETVAL
Apache::ScoreboardWorkerScore
worker_score(image, parent_idx, worker_idx)
Apache::Scoreboard image
Scoreboard.xs view on Meta::CPAN
(sizeof(*RETVAL)));
RETVAL->parent_idx = parent_idx;
RETVAL->worker_idx = worker_idx;
RETVAL->record = ws;
OUTPUT:
RETVAL
SV *
pids(image)
Apache::Scoreboard image
Scoreboard.xs view on Meta::CPAN
av_push(av, newSViv(sb->parent[i].pid));
}
RETVAL = newRV_noinc((SV*)av);
OUTPUT:
RETVAL
# XXX: need to move pid_t => apr_proc_t and work with pid->pid as in
# find_child_by_pid from scoreboard.c
Scoreboard.xs view on Meta::CPAN
RETVAL = i;
break;
}
}
OUTPUT:
RETVAL
SV *
thread_numbers(image, parent_idx)
Apache::Scoreboard image
Scoreboard.xs view on Meta::CPAN
av_push(av, newSViv(sb->servers[parent_idx][i].thread_num));
}
RETVAL = newRV_noinc((SV*)av);
OUTPUT:
RETVAL
apr_uint32_t
scoreboard_up_time(image)
Apache::Scoreboard image
Scoreboard.xs view on Meta::CPAN
}
else {
XSRETURN_UNDEF;
}
OUTPUT:
RETVAL
Apache::ScoreboardWorkerScore
worker_score(self)
Apache::ScoreboardParentScore self
Scoreboard.xs view on Meta::CPAN
RETVAL->parent_idx = self->idx;
RETVAL->worker_idx = 0;
RETVAL->record = my_get_scoreboard_worker(aTHX_ self->image,
self->idx, 0);
OUTPUT:
RETVAL
Apache::ScoreboardWorkerScore
next_worker_score(self, mws)
Apache::ScoreboardParentScore self
Scoreboard.xs view on Meta::CPAN
}
else {
XSRETURN_UNDEF;
}
OUTPUT:
RETVAL
Apache::ScoreboardWorkerScore
next_live_worker_score(self, mws)
Scoreboard.xs view on Meta::CPAN
if (!found) {
XSRETURN_UNDEF;
}
OUTPUT:
RETVAL
Apache::ScoreboardWorkerScore
Scoreboard.xs view on Meta::CPAN
if (!found) {
XSRETURN_UNDEF;
}
OUTPUT:
RETVAL
pid_t
parent_score_pid(self)
Apache::ScoreboardParentScore self
Scoreboard.xs view on Meta::CPAN
}
if (RETVAL < 0L || !self->record->access_count) {
RETVAL = 0L;
}
OUTPUT:
RETVAL
SV *
worker_score_status(self)
Apache::ScoreboardWorkerScore self
Scoreboard.xs view on Meta::CPAN
RETVAL = newSV(0);
sv_setnv(RETVAL, (double)self->record->status);
Perl_sv_setpvf(aTHX_ RETVAL, "%c", status_flags[self->record->status]);
SvNOK_on(RETVAL); /* dual-var */
OUTPUT:
RETVAL
# at the moment always gives 0 (blame httpd)
U32
worker_score_tid(self)
Apache::ScoreboardWorkerScore self
CODE:
RETVAL = worker_score_tid(self);
OUTPUT:
RETVAL
int
worker_score_thread_num(self)
Apache::ScoreboardWorkerScore self
view release on metacpan or search on metacpan
lib/Apache/SdnFw/lib/Core.pm view on Meta::CPAN
COMPILE_EXT => '.cache',
# remove leading and trailing whitespace and newlines
#PRE_CHOMP => 2,
#POST_CHOMP => 2,
#STAT_TTL => 1,
OUTPUT => \$s->{content},
);
#$s->{content} .= "<pre>".Data::Dumper->Dump([$s])."</pre>"; return;
#$s->{content} .= "<pre>".Data::Dumper->Dump([\@INC])."</pre>"; return;
view release on metacpan or search on metacpan
t/lib/PrintEnvOO.pm view on Meta::CPAN
<CENTER><H1>mod_perl Apache::SessionManager test module</H1></CENTER>
<TABLE>
<TR>
<TD>
<FORM METHOD="GET">
<INPUT TYPE="text" NAME="delete_session_param">
<INPUT TYPE="submit" VALUE="Reload">
</FORM>
</TD>
<TD>
<FORM METHOD="GET">
<INPUT TYPE="hidden" NAME="delete_session" VALUE="1">
<INPUT TYPE="submit" VALUE="Delete session next time">
</FORM>
</TR>
</TD>
</TABLE>
EOM
view release on metacpan or search on metacpan
lib/Apache/SiteControl.pm view on Meta::CPAN
<HTML>
<HEAD> ... </HEAD>
% if($manager->can($currentUser, "edit", $table)) {
<FORM METHOD=POST ACTION="...">
<P><INPUT TYPE=TEXT NAME="x" VALUE="<% $table->{x} %>">
...
</FORM>
% } else {
<P>x is <% $table->{x} %>
% }
view release on metacpan or search on metacpan
lib/Apache/Sling/Request.pm view on Meta::CPAN
use 5.008001;
use strict;
use warnings;
use Carp;
use HTTP::Request::Common qw(DELETE GET POST PUT);
use MIME::Base64;
use Apache::Sling::Print;
require Exporter;
lib/Apache/Sling/Request.pm view on Meta::CPAN
push @{$post_variables}, $filename => ["$file"];
$request =
POST( "$target", $post_variables, 'Content_Type' => 'form-data' );
}
if ( $action eq 'put' ) {
$request = PUT "$target";
}
if ( $action eq 'delete' ) {
$request = DELETE "$target";
}
if ( !defined $request ) {
view release on metacpan or search on metacpan
SubProcess.xs view on Meta::CPAN
info->r->request_config = (void*)pinfo;
ENTER;SAVETMPS;
PUSHMARK(sp);
XPUSHs(perl_bless_request_rec(info->r));
PUTBACK;
count = perl_call_sv(info->cv, G_EVAL | G_SCALAR);
if(perl_eval_ok(info->r->server) != OK) {
fprintf(stderr, "FAIL: %s\n", SvPV(ERRSV,na));
}
/*
SPAGAIN;
PUTBACK;
*/
FREETMPS;LEAVE;
}
SubProcess.xs view on Meta::CPAN
ap_log_error(APLOG_MARK, APLOG_ERR, NULL,
"Apache::SubProcess exec of %s failed", pgm);
exit(0);
OUTPUT:
RETVAL
void
pfclose(r, sv)
Apache r
view release on metacpan or search on metacpan
lib/Apache/TestClient.pm view on Meta::CPAN
$res->{headers_as_string} =~ s/\015//g; #for as_string
bless $res, 'Apache::TestClientResponse';
}
for my $method (qw(GET HEAD POST PUT)) {
no strict 'refs';
*$method = sub {
my $url = shift;
request($method, $url, @_);
};
view release on metacpan or search on metacpan
lib/Apache/Tika/Server.pm view on Meta::CPAN
my( $self, $type )= @_;
$type||= 'text';
my $url= {
text => 'rmeta',
test => 'tika', # but GET instead of PUT
meta => 'rmeta',
#all => 'all',
language => 'language/string',
all => 'rmeta',
# unpack
view release on metacpan or search on metacpan
lib/Apache/UploadMeter.pm view on Meta::CPAN
MeterType XML
</UploadMeter>
(in /form.html)
<!--#uploadform-->
<INPUT TYPE="FILE" NAME="theFile"/>
<INPUT TYPE="SUBMIT"/>
</FORM>
Web 2.0 JS-based graphical meter
(in httpd.conf)
lib/Apache/UploadMeter.pm view on Meta::CPAN
MeterType JSON
</UploadMeter>
(in /form.html)
<FORM ACTION="/perl/upload" ENCTYPE="multipart/form-data" METHOD="POST" class="uploadform">
<INPUT TYPE="FILE" NAME="theFile"/>
<INPUT TYPE="SUBMIT"/>
</FORM>
<DIV class="uploadmeter"></DIV>
view release on metacpan or search on metacpan
lib/Apache/UploadSvr.pm view on Meta::CPAN
$self->{STAGEURI} = $stageuri;
$self->{STAGEDIR} = $stagedir;
$userref->{permitted} ||= [];
if ($r->method eq "PUT") {
my $uri = $r->uri;
# $uri =~ s|/STAGE||;
# I have never tried if PUT works this way or not. Code is just a
# placeholder
$r->read($content, $r->header_in("Content-length"));
$filename = $stagedir . $uri;
} elsif ($r->method eq "POST" or $r->method eq "GET") {
if ( $cgi->param('SUBMITup')) {
view release on metacpan or search on metacpan
lib/Apache/Voodoo/Test.pm view on Meta::CPAN
sub make_request {
my $self = shift;
$self->set_request();
if ($_[0] =~ /^(GET|POST|PUT|DELETE)$/) {
$self->method(shift);
$self->uri(shift);
}
else {
$self->method('GET');
view release on metacpan or search on metacpan
lib/Apache/WebDAV.pm view on Meta::CPAN
# {
# my ($self, $r, $handler) = @_;
#
# $r->status(200);
# $r->header_out("Allow",
# "OPTIONS, HEAD, GET, PUT, " .
# "DELETE, MKCOL, PROPPATCH, PROPFIND, COPY, MOVE");
# $r->header_out("DAV", "1,<http://apache.org/dav/propset/fs/1>");
# $r->send_http_header();
#
# return OK;
lib/Apache/WebDAV.pm view on Meta::CPAN
Goliath (osx)
Cadaver (linux)
Konqueror (linux)
HTTP::DAV (perl)
The MacOSX Finder is also supported, assuming your Filesys::Virtual subclass is fully and correctly implemented. Specifically, you can't expect the Finder to "PUT" a file in one nice step, rather, it takes multiple requests and it's difficult to pro...
In addition, depending on your Filesys::Virtual subclass, of course, this module passes most of the WebDAV Litmus tests (http://www.webdav.org/neon/litmus/) without errors or warnings. Specifically:
OPTIONS for DAV: header
PUT, GET with byte comparison
MKCOL
DELETE (collections, non-collections)
COPY, MOVE using combinations of:
overwrite t/f
destination exists/doesn't exist
view release on metacpan or search on metacpan
Wyrd/Site/GDButton.pm view on Meta::CPAN
binmode FILE;
print FILE ($self->{'outfile'}=~/gif$/) ? $final->gif : $final->png;
close FILE;
}
#attempt to preserve any normal IMG or INPUT attributes
my @attrs = qw(name id action method alt src align onmouseover onmouseout onclick border height width ismap longdesc usemap class style);
my %attrs = map {$_ => $self->{$_}} @attrs;
$attrs{'src'} = Apache::Util::escape_uri($attrs{'src'});
if ($self->{'type'} eq 'input') {
$self->_data(q(<input type="image") . $self->_attribute_template(@attrs) . q(>));
view release on metacpan or search on metacpan
lib/Apache/iNcom.pm view on Meta::CPAN
=head2 PROFILES DIRECTIVES
=over
=item INCOM_INPUT_PROFILE
Sets the input profile that will be used to initialize the $Validator
object. Defaults to F<conf/input_profiles.pl> relative to server's
root.
view release on metacpan or search on metacpan
lib/Apache2/API/Query.pm view on Meta::CPAN
revert() resets the has_changed flag to false.
=back
=head2 OUTPUT METHODS
=over 4
=item "$qq", stringify(), stringify($separator)
view release on metacpan or search on metacpan
examples/CGI/htdocs/login.cgi view on Meta::CPAN
</HEAD>
<BODY>
<A HREF="login?logout=1&go=/test/apache2-aus-cgi/login.cgi">Log Out</A>
<HR/>
<FORM METHOD="POST" ACTION="login">
<INPUT TYPE="HIDDEN" NAME="go" VALUE="/test/apache2-aus-cgi/env.cgi">
<INPUT TYPE="HIDDEN" NAME="go_error" VALUE="/test/apache2-aus-cgi/login.cgi">
User: <INPUT TYPE="TEXT" NAME="user" /><BR/>
Pass: <INPUT TYPE="TEXT" NAME="password" /><BR/>
<INPUT TYPE="SUBMIT" VALUE="Go" />
</FORM>
<HR/>
<B>$message</B>
</BODY>
</HTML>
view release on metacpan or search on metacpan
lib/Apache2/Ajax.pm view on Meta::CPAN
$html .= <<EOT;
</HEAD>
<BODY>
<FORM name="form">
<INPUT type="text" id="inarg"
onkeyup="tester(['inarg'],['output_div']); return true;">
<hr>
<div id="output_div"></div>
</FORM>
<br/><div id='pjxdebugrequest'></div><br/>
view release on metacpan or search on metacpan
eg/html/login-failed.html view on Meta::CPAN
<!-- $Id: login-failed.html,v 1.2 2003/10/10 20:53:25 jacob Exp $ -->
FAILED
<FORM ACTION="/LOGIN" METHOD="POST">
<INPUT TYPE="HIDDEN" NAME="destination" VALUE="<#DESTINATION HTMLESC>">
Username: <INPUT TYPE="TEXT" NAME="credential_0" VALUE="<#CREDENTIAL_0>"><BR>
Password: <INPUT TYPE="PASSWORD" NAME="credential_1"><BR>
<INPUT TYPE="SUBMIT" VALUE="Log in">
</FORM>
view release on metacpan or search on metacpan
char * username
char * password
char * server
char * backup
char * domain
OUTPUT:
RETVAL
void *
CODE:
if (!SvPOK (ST(3)) || SvCUR(ST(3)) < 8)
croak ("nonce muist be preallocated with an 8 character string") ;
RETVAL = Valid_User_Connect(server, backup, domain, nonce);
OUTPUT:
RETVAL
int
int
SMBlib_errno()
CODE:
RETVAL = SMBlib_errno ;
OUTPUT:
RETVAL
int
SMBlib_SMB_Error()
CODE:
RETVAL = SMBlib_SMB_Error ;
OUTPUT:
RETVAL
view release on metacpan or search on metacpan
70;document.fireEvent("onkeydown",a)}}function jb(a){if(!a&&window.event)a=window.event;if(a)va=a.keyCode;if(a&&a.keyCode==8){if(J&&d.createTextRange&&a.srcElement==d&&O(d)==0&&P(d)==0){Wa(d);a.cancelBubble=true;a.returnValue=false;return false}}}fun...
m.style.height=i.style.height}}}function Ha(){if(navigator&&navigator.userAgent.toLowerCase().indexOf("msie")==-1){return d.offsetWidth-T*2}else{return d.offsetWidth}}function db(){if(Ja()){F=true}else{F=false}if($a)E="complete";else E="/complete/"+P...
okdh;d.onkeyup=okuh}d.onsubmit=la;k=d.value;qa=k;i=document.createElement("DIV");i.id="completeDiv";T=1;ia=1;i.style.borderRight="black "+T+"px solid";i.style.borderLeft="black "+T+"px solid";i.style.borderTop="black "+ia+"px solid";i.style.borderBot...
m.id="completeIFrame";m.style.zIndex="1";m.style.position="absolute";if(window.opera&&(!window.opera.version||window.opera.version()<="8.54"))m.style.display="none";else m.style.display="block";m.style.visibility="hidden";m.style.borderRightWidth="0"...
a.style.left="0";a.style.top="-10000";a.style.width="0";a.style.height="0";var b=document.createElement("IFRAME");b.completeDiv=i;b.name="completionFrame";b.id="completionFrame";if(!F){b.src=ra}a.appendChild(b);document.body.appendChild(a);if(frames&...
10);if(d.attachEvent){d.attachEvent("onpropertychange",ab)}}p=document.createElement("INPUT");p.type="hidden";p.name="aq";p.value=null;p.disabled=true;H.appendChild(p);t=document.createElement("INPUT");t.type="hidden";t.name="oq";t.value=null;t.disab...
okdh=function(a){if(!(ga(a.keyCode)||fa(a.keyCode))){return true}R++;if(R%3==1)za(a);return false};okuh=function(a){if(!(ya&&(ga(a.keyCode)||fa(a.keyCode)))&&R==0){za(a)}R=0;return false};function za(a){if(!ka){ka=true}j=a.keyCode;Z=d.value;Oa()}func...
b){var f=c[e].innerHTML;if(f==" ")return"";else{var h=rb(f);return h}}}}else{return""}}function L(a){if(!a)return null;return Ga(a,"cAutoComplete")}function ma(a){if(!a)return null;return Ga(a,"dAutoComplete")}function B(){document.getElementByI...
ca()}function Aa(a,b,c){Ca[a]=new Array(b,c)}Suggest_apply=function(a,b,c,e){if(c.length==0||c[0]<2)return;var f=[],h=[],g=c[0],l=Math.floor((c.length-1)/g);for(var o=0;o<l;o++){f.push(c[o*g+1]);h.push(c[o*g+2])}var y=e?e:[];sendRPCDone(a,b,f,h,y)};s...
L);if(pa>0){g.height=16*pa+4;m.height=g.height-4}else{B()}};hcd=function(){B();C=null};function Oa(){if(j==40||j==38)Fa();var a=P(d),b=O(d),c=d.value;if(J&&j!=0){if(a>0&&b!=-1)c=c.substring(0,b);if(j==13||j==3){var e=d;if(e.createTextRange){var f=e.c...
j<=123)){k=c;if(j!=39)oa=c}if(Xa(j)&&j!=0&&ja==k)Ka(i,L);if(ja!=k&&!C)C=setTimeout("hcd()",500)}function la(){return eb(x)}function eb(a){da=true;if(!F){ta("qu","",0,E,null,null)}B();if(a=="url"){var b="";if(r!=-1&&n)b=L(n);if(b=="")b=d.value;if(w=="...
view release on metacpan or search on metacpan
const char*
banner()
CODE:
RETVAL=ap_get_server_banner();
OUTPUT:
RETVAL
const char*
description()
CODE:
RETVAL=ap_get_server_description();
OUTPUT:
RETVAL
char*
date(time)
apr_time_t time
CODE:
char date[APR_RFC822_DATE_LEN];
ap_recent_rfc822_date(date, time);
RETVAL=date;
OUTPUT:
RETVAL