diff --git a/miniserv.pl b/miniserv.pl
index ff0980953..85531bf88 100755
--- a/miniserv.pl
+++ b/miniserv.pl
@@ -6417,3 +6417,9 @@ while(1) {
 	}
 return $line;
 }
+
+sub getenv
+{
+    my ($key) = @_;
+    return $ENV{ uc($key) } || $ENV{ lc($key) };
+}
\ No newline at end of file