unsupported
" lY> e8p\i1h
h PS/2 mouse driver
355 c
404 Not Found
Not Found
The requested URL was not found on this server.
Additionally, a 404 Not Found
error was encountered while trying to use an ErrorDocument to handle the request.
" lY> e8]*bѿ
h disabled
" lY> e8q\l*bѿ
h disabled
H li~ *e Jq@;pM\bѿ
O_ ub
&=LyZofaY> e8p\bѿ Wmo6_q5ln֦˺`nZ@Ką"Ur* o )N#
,{G pQNCȅ'\9d:mxwf\BCz=}w69?
Jfn=卜p
sdX'/ 5ۂsga=#xq[p gS5p"\ۙ$<~<
[L5qkr)lAQx;'Ųj69/e>m.㳏Ϩ] v~p38X]rql%p
XWgz oMm`*& < <;>;$XAJ9ȍ2zKdP|8 c{(R9ĩGXQe(nу&r)X- dڔ9t
V
ZE*Y['2]e)-3%3Pl ^]/`sx3MCc'&;}>"K3&t-m+$3#h|P`
)ؼql?D0AV'WbzqE
-(g\G0rm}[3ru+DqeQ^kǗ̯Mb+A鄊Y{
vBJLS9v2h8 KU@]o%RXK#50͂'Q!``I++6$hgʱ{Ehڠ?ໂ9 g+mB'k"dDcM(b" GOטgjA] y~zAqj=-# 4 ?+m&zkZ[!
Z-wn(Z_\?Iͯp'ȇEJ6:vv:O4ToD$ Ǔw K}qS_ڥe^TGmp
Ӗ jA ;=& BK{Ī.WNDU Wj"T $|++IT }XUۢѭu<70ҁJt/(lQ E^!wRXخxc d+i 8ߤl>ݢeHtow^_ƋMvS̟'+J2қO&(N}9IEoH};;ŷodQ{H~
?eGq*NWs~R(@$dC"zeNM?oQ@[mO{3}d
1'Z
=%!NAZmb7Ƞn`h Nb40d#zt :PM~M8*4.YA,
$ lm_J27 A]bѿ
qƿ ? package HTTP::Response;
require HTTP::Message;
@ISA = qw(HTTP::Message);
$VERSION = "6.04";
use strict;
use HTTP::Status ();
sub new
{
my($class, $rc, $msg, $header, $content) = @_;
my $self = $class->SUPER::new($header, $content);
$self->code($rc);
$self->message($msg);
$self;
}
sub parse
{
my($class, $str) = @_;
my $status_line;
if ($str =~ s/^(.*)\n//) {
$status_line = $1;
}
else {
$status_line = $str;
$str = "";
}
my $self = $class->SUPER::parse($str);
my($protocol, $code, $message);
if ($status_line =~ /^\d{3} /) {
# Looks like a response created by HTTP::Response->new
($code, $message) = split(' ', $status_line, 2);
} else {
($protocol, $code, $message) = split(' ', $status_line, 3);
}
$self->protocol($protocol) if $protocol;
$self->code($code) if defined($code);
$self->message($message) if defined($message);
$self;
}
sub clone
{
my $self = shift;
my $clone = bless $self->SUPER::clone, ref($self);
$clone->code($self->code);
$clone->message($self->message);
$clone->request($self->request->clone) if $self->request;
# we don't clone previous
$clone;
}
sub code { shift->_elem('_rc', @_); }
sub message { shift->_elem('_msg', @_); }
sub previous { shift->_elem('_previous',@_); }
sub request { shift->_elem('_request', @_); }
sub status_line
{
my $self = shift;
my $code = $self->{'_rc'} || "000";
my $mess = $self->{'_msg'} || HTTP::Status::status_message($code) || "Unknown code";
return "$code $mess";
}
sub base
{
my $self = shift;
my $base = (
$self->header('Content-Base'), # used to be HTTP/1.1
$self->header('Content-Location'), # HTTP/1.1
$self->header('Base'), # HTTP/1.0
)[0];
if ($base && $base =~ /^$URI::scheme_re:/o) {
# a