diff --git a/README.md b/README.md
index 76c950c..bacd729 100644
--- a/README.md
+++ b/README.md
@@ -10,6 +10,7 @@ uwu in every programming language in the world
 - [C](uwu.c)
 - [C#](uwu.cs)
 - [C++](uwu.cpp)
+- [COBOL](uwu.cbl)
 - [D](uwu.d)
 - [Elixir](uwu.ex)
 - [Emojicode](uwu.emojic)
diff --git a/uwu.cbl b/uwu.cbl
new file mode 100644
index 0000000..414c9fc
--- /dev/null
+++ b/uwu.cbl
@@ -0,0 +1,5 @@
+IDENTIFICATION DIVISION.
+PROGRAM-ID. UWU.
+PROCEDURE DIVISION.
+DISPLAY 'uwu'.
+STOP RUN.