From e1ce0b18017b3142ed73f30b367baa01a1f6d41a Mon Sep 17 00:00:00 2001
From: Steffen Lange <github@stelas.de>
Date: Fri, 2 Jul 2021 10:35:27 +0200
Subject: [PATCH] Add Strawberry Perl

---
 modules/StrawberryPerl.php | 14 ++++++++++++++
 1 file changed, 14 insertions(+)
 create mode 100644 modules/StrawberryPerl.php

diff --git a/modules/StrawberryPerl.php b/modules/StrawberryPerl.php
new file mode 100644
index 0000000..21cdcc9
--- /dev/null
+++ b/modules/StrawberryPerl.php
@@ -0,0 +1,14 @@
+<?php
+
+class StrawberryPerl extends PatchBase {
+	function __construct() {
+		parent::__construct('Adam Kennedy', 'Strawberry Perl', 'https://strawberryperl.com/');
+	}
+	function check() : bool {
+		if ($this->fetch('https://strawberryperl.com/'))
+			return $this->parse('_/download/[\d\.]+/strawberry-perl-([\d\.]+)-\d+bit\.msi_');
+		return false;
+	}
+}
+
+?>