1 files changed, 6 insertions, 0 deletions
diff --git a/perl-mode/while b/perl-mode/while
new file mode 100644
index 0000000..2744530
--- /dev/null
+++ b/perl-mode/while
@@ -0,0 +1,6 @@
+# name: while (...) { ... }
+# key: while
+# --
+while ($1) {
+    $0
+}
+\ No newline at end of file