|
version 1.93, 2011/11/03 22:32:04
|
version 1.94, 2011/11/08 22:25:25
|
|
Line 515 sub clean_sockets {
|
Line 515 sub clean_sockets {
|
| # ----------------------------------------------------------------------- httpd |
# ----------------------------------------------------------------------- httpd |
| sub check_httpd_logs { |
sub check_httpd_logs { |
| my ($fh)=@_; |
my ($fh)=@_; |
| if (open(PIPE,"lchttpdlogs|")) { |
if (open(PIPE,"./lchttpdlogs|")) { |
| while (my $line=<PIPE>) { |
while (my $line=<PIPE>) { |
| &log($fh,$line); |
&log($fh,$line); |
| if ($line=~/\[error\]/) { $notices++; } |
if ($line=~/\[error\]/) { $notices++; } |
![[BACK]](/icons/back.gif){kind=icon}
Return to loncron CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom