--- a/modules/string.tp	Fri Jul 25 13:43:25 2014 -0700
+++ b/modules/string.tp	Fri Jul 25 13:43:36 2014 -0700
@@ -303,6 +303,12 @@
 		}
 		from: start withLength: (end - start)
 	}
+	
+	startsWith? <- :prefix {
+		if: (prefix length) <= length {
+			0 = (compareSub: prefix 0 0 (prefix length))
+		}
+	}
 
 	endsWith? <- :suffix {
 		if: (suffix length) <= length {