[LON-CAPA-cvs] cvs: loncom / lonhttpd

[albertel]

albertel		Tue Jul  1 15:57:45 2003 EDT

  Modified files:              
    /loncom	lonhttpd 
  Log:
  - rh9 seems to being dumb here [^\s] is acting different from \S
  
  
Index: loncom/lonhttpd
diff -u loncom/lonhttpd:1.7 loncom/lonhttpd:1.8
--- loncom/lonhttpd:1.7	Fri May  2 17:03:19 2003
+++ loncom/lonhttpd	Tue Jul  1 15:57:45 2003
@@ -1,5 +1,5 @@
 #!/usr/bin/perl
-# $Id: lonhttpd,v 1.7 2003/05/02 21:03:19 www Exp $
+# $Id: lonhttpd,v 1.8 2003/07/01 19:57:45 albertel Exp $
 
 $VERSION = "1.3.2 (Demonic/Linux/LON-CAPA Derivative $Revison$)";
 
@@ -296,7 +296,7 @@
 select(STDOUT); $|=1; $address = 0; 
 alarm 1;
 while (<STDIN>) {
-	if(/^([A-Z]+)\s+([^\s]+)\s+([^\s\r\l\n]*)/) {
+	if(/^([A-Z]+)\s+(\S+)\s+(\S*)/) {
 		$method = $1;
 		$address = $2; 
 		$httpver = $3;