support CRLF in tests
Rafael Kitover [Thu, 19 May 2011 06:57:10 +0000 (02:57 -0400)]
t/cgibin.t

index 39f0fd8..0e8179d 100644 (file)
@@ -62,7 +62,7 @@ is($response->content, 'foo:bar bar:baz',
     'POST to Perl CGI File through a forward via cgi_action');
 
 $response = request '/my-bin/path/testdata.pl';
-is($response->content, "testing\n",
+like($response->content, qr/^testing\r?\n\z/,
     'scripts with __DATA__ sections work');
 
 $response = request '/my-bin/pathinfo.pl/path/info';