diff --git a/anarres/strings.scm b/anarres/strings.scm
new file mode 100644
index 0000000..582eb79
--- /dev/null
+++ b/anarres/strings.scm
@@ -0,0 +1,11 @@
+(define-module (anarres strings))
+
+(define-public (string-remove-prefix prefix s)
+  (if (string-prefix? prefix s)
+      (string-drop s (string-length prefix))
+      s))
+
+(define-public (string-remove-suffix suffix s)
+  (if (string-suffix? suffix s)
+      (string-drop-right s (string-length suffix))
+      s))