| … | |
… | |
| 156 | $self->{time} = $::NOW; |
156 | $self->{time} = $::NOW; |
| 157 | |
157 | |
| 158 | weaken ($Coro::current->{conn} = $self); |
158 | weaken ($Coro::current->{conn} = $self); |
| 159 | |
159 | |
| 160 | $::conns++; |
160 | $::conns++; |
|
|
161 | $::maxconns = $::conns if $::conns > $::maxconns; |
| 161 | |
162 | |
| 162 | $self; |
163 | $self; |
| 163 | } |
164 | } |
| 164 | |
165 | |
| 165 | sub DESTROY { |
166 | sub DESTROY { |
| … | |
… | |
| 469 | |
470 | |
| 470 | $self->response(200, "ok", |
471 | $self->response(200, "ok", |
| 471 | { |
472 | { |
| 472 | "Content-Type" => "text/html", |
473 | "Content-Type" => "text/html", |
| 473 | "Content-Length" => length $idx, |
474 | "Content-Length" => length $idx, |
| 474 | #d# directories change all the time, so X- |
|
|
| 475 | "X-Last-Modified" => time2str ((stat _)[9]), |
475 | "Last-Modified" => time2str ((stat _)[9]), |
| 476 | }, |
476 | }, |
| 477 | $idx); |
477 | $idx); |
| 478 | } |
478 | } |
| 479 | |
479 | |
| 480 | sub handle_file { |
480 | sub handle_file { |
