diff --git a/extensions/perl/perl.language-configuration.json b/extensions/perl/perl.language-configuration.json
index 6cf6295b798..c142f2d58f6 100644
--- a/extensions/perl/perl.language-configuration.json
+++ b/extensions/perl/perl.language-configuration.json
@@ -25,8 +25,8 @@
 	],
 	"folding": {
 		"markers": {
-			"start": "^=pod\\s*$",
-			"end": "^=cut\\s*$"
+			"start": "^(?:(?:=pod\\s*$)|(?:\\s*#region\\b))",
+			"end": "^(?:(?:=cut\\s*$)|(?:\\s*#endregion\\b))"
 		}
 	}
 }
\ No newline at end of file