diff fastcgi.t @ 40:3325fa3f515c

Tests: avoid using \r\n.
author Maxim Dounin <mdounin@mdounin.ru>
date Sat, 01 Nov 2008 16:13:02 +0300
parents bd1a5e92d0c0
children 1b3c22a87e5d
line wrap: on
line diff
--- a/fastcgi.t
+++ b/fastcgi.t
@@ -71,11 +71,14 @@ sub fastcgi_daemon {
 
 	my $count;
 	while( $request->Accept() >= 0 ) {
-		print "Location: http://localhost:8080/redirect\r\n";
-		print "Content-type: text/html\r\n";
-		print "\r\n";
-		print "SEE-THIS\n";
-		print ++$count;
+		$count++;
+		print <<EOF;
+Location: http://localhost:8080/redirect
+Content-Type: text/html
+
+SEE-THIS
+$count
+EOF
 	}
 
 	FCGI::CloseSocket($socket);