Pretty

nigelhorne · Feb 6, 2025 · b610cc2 · b610cc2
1 parent e82737a
commit b610cc2
Show file tree

Hide file tree

Showing 2 changed files with 13 additions and 13 deletions.
diff --git a/README.md b/README.md
@@ -1,14 +1,14 @@
 CGI-Info
 ========
 
--[![Appveyor Status](https://ci.appveyor.com/api/projects/status/1t1yhvagx00c2qi8?svg=true)](https://ci.appveyor.com/project/nigelhorne/cgi-info)
+[![Appveyor Status](https://ci.appveyor.com/api/projects/status/1t1yhvagx00c2qi8?svg=true)](https://ci.appveyor.com/project/nigelhorne/cgi-info)
 [![CircleCI](https://dl.circleci.com/status-badge/img/circleci/8CE7w65gte4YmSREC2GBgW/THucjGauwLPtHu1MMAueHj/tree/main.svg?style=svg)](https://dl.circleci.com/status-badge/redirect/circleci/8CE7w65gte4YmSREC2GBgW/THucjGauwLPtHu1MMAueHj/tree/main)
--[![Coveralls Status](https://coveralls.io/repos/github/nigelhorne/CGI-Info/badge.svg?branch=master)](https://coveralls.io/github/nigelhorne/CGI-Info?branch=master)
--[![CPAN](https://img.shields.io/cpan/v/CGI-Info.svg)](http://search.cpan.org/~nhorne/CGI-Info/)
+[![Coveralls Status](https://coveralls.io/repos/github/nigelhorne/CGI-Info/badge.svg?branch=master)](https://coveralls.io/github/nigelhorne/CGI-Info?branch=master)
+[![CPAN](https://img.shields.io/cpan/v/CGI-Info.svg)](http://search.cpan.org/~nhorne/CGI-Info/)
 ![GitHub Workflow Status](https://img.shields.io/github/actions/workflow/status/nigelhorne/ntpdate/ntpdate.yml?branch=master)
 ![Perl Version](https://img.shields.io/badge/perl-5.8+-blue)
--[![Travis Status](https://travis-ci.org/nigelhorne/CGI-Info.svg?branch=master)](https://travis-ci.org/nigelhorne/CGI-Info)
--[![Tweet](https://img.shields.io/twitter/url/http/shields.io.svg?style=social)](https://x.com/intent/tweet?text=Information+about+the+CGI+Environment+#perl+#CGI&url=https://github.com/nigelhorne/cgi-info&via=nigelhorne)
+[![Travis Status](https://travis-ci.org/nigelhorne/CGI-Info.svg?branch=master)](https://travis-ci.org/nigelhorne/CGI-Info)
+[![Tweet](https://img.shields.io/twitter/url/http/shields.io.svg?style=social)](https://x.com/intent/tweet?text=Information+about+the+CGI+Environment+#perl+#CGI&url=https://github.com/nigelhorne/cgi-info&via=nigelhorne)
 
 # NAME
 

diff --git a/t/waf.t b/t/waf.t
@@ -14,7 +14,7 @@ my $upload_dir = tempdir(CLEANUP => 1);
 
 subtest 'Allowed Parameters' => sub {
 	local %ENV = (
-	GATEWAY_INTERFACE => 'CGI/1.1',
+		GATEWAY_INTERFACE => 'CGI/1.1',
 		REQUEST_METHOD => 'GET',
 		QUERY_STRING => 'allowed_param=123&disallowed_param=evil',
 	);
@@ -27,12 +27,12 @@ subtest 'Allowed Parameters' => sub {
 		{ allowed_param => '123' },
 		'Only allowed parameters are present'
 	);
-	is($info->status(), 422, 'Status is not OK when disallowed params are used');
+	cmp_ok($info->status(), '==', 422, 'Status is not OK when disallowed params are used');
 };
 
 subtest 'SQL Injection Detection' => sub {
 	local %ENV = (
-	GATEWAY_INTERFACE => 'CGI/1.1',
+		GATEWAY_INTERFACE => 'CGI/1.1',
 		REQUEST_METHOD => 'GET',
 		QUERY_STRING => 'username=nigel%27+OR+%271%27%3D%271',
 	);
@@ -46,7 +46,7 @@ subtest 'SQL Injection Detection' => sub {
 
 subtest 'XSS Sanitization' => sub {
 	local %ENV = (
-	GATEWAY_INTERFACE => 'CGI/1.1',
+		GATEWAY_INTERFACE => 'CGI/1.1',
 		REQUEST_METHOD => 'GET',
 		QUERY_STRING => 'comment=<script>alert("xss")</script>',
 	);
@@ -65,7 +65,7 @@ subtest 'XSS Sanitization' => sub {
 
 subtest 'Directory Traversal Prevention' => sub {
 	local %ENV = (
-	GATEWAY_INTERFACE => 'CGI/1.1',
+		GATEWAY_INTERFACE => 'CGI/1.1',
 		REQUEST_METHOD => 'GET',
 		QUERY_STRING => 'file=../../etc/passwd',
 	);
@@ -79,7 +79,7 @@ subtest 'Directory Traversal Prevention' => sub {
 
 subtest 'Upload Directory Validation' => sub {
 	local %ENV = (
-	GATEWAY_INTERFACE => 'CGI/1.1',
+		GATEWAY_INTERFACE => 'CGI/1.1',
 		REQUEST_METHOD => 'POST',
 		CONTENT_TYPE => 'multipart/form-data; boundary=12345',
 		CONTENT_LENGTH => 100,
@@ -102,7 +102,7 @@ subtest 'Upload Directory Validation' => sub {
 
 subtest 'Parameter Sanitization' => sub {
 	local %ENV = (
-	GATEWAY_INTERFACE => 'CGI/1.1',
+		GATEWAY_INTERFACE => 'CGI/1.1',
 		REQUEST_METHOD => 'GET',
 		QUERY_STRING => 'key%00=evil%00data&value=valid+data',
 	);
@@ -116,7 +116,7 @@ subtest 'Parameter Sanitization' => sub {
 
 subtest 'Max Upload Size Enforcement' => sub {
 	local %ENV = (
-	GATEWAY_INTERFACE => 'CGI/1.1',
+		GATEWAY_INTERFACE => 'CGI/1.1',
 		REQUEST_METHOD => 'POST',
 		CONTENT_TYPE => 'application/x-www-form-urlencoded',
 		CONTENT_LENGTH => 1024 * 1024 * 600,	# 600MB